Enviar Registro por Correo electrónico: Using turbo Pascal /