Como Saber si una Dirección de Correo es Válida????

[johncook]

Muchachos, muchachos... Tanto lío para validar un mail...
Porque mejor no valernos de expresiones regulares, no? En C# no hay q instalar ninguna libreria de terceros para el uso de éstas expresiones... En delphi yo utilizo RegExpr, porque desconozco si existe alguna función nativa del lenguaje...

Código Delphi [-]
 uses RegExpr;
 
procedure TForm1.Button1Click(Sender: TObject);
// Valida la dirección de email en Edit1
begin
  if not ExecRegExpr('[\w\d\-\.]+@[\w\d\-]+(\.[\w\d\-]+)+',
      Edit1.Text) then begin
    ShowMessage('La dirección de email no es válida');
    Edit1.SetFocus;
  end else
    ShowMessage('La dirección de email es válida');
end;

Les dejo el enlace

[[__hector]]

Puedes conectarte al servidor smtp del dominio al que quieres mandar el mail, y con un par de comandos, puedes saber si esa cuenta existe en dicho servidor. Digo, si te refieres a validar que existe, y no exactamente a validar la sintaxis de la direccion.

[AGAG4]

Muchas Gracias por sus respuestas, estoy tomando en cuenta todas sus opiniones, Que Tengan Buen Día....!!!!

[JXJ]

johncook

Una busqueda rapida, me llevo a sitios

http://anso.da.ru/
http://anso.virtualave.net/

Pero ya estan muertos.

¿¿Cual es el enlace. ??

gracias.

[jachguate]

Con la ayuda de algunos trucos, he llegado al nuevo sitio oficial de TRegExpr para delphi

Hasta luego.

[johncook]

Sorry, se me olvidó el enlace.... Pero es el que puso el amigo jachguate.. Gracias. Saludos.

[AGAG4]

Gracias por sus respuestas....

Que Tengan Buen Día....