Hola,
Estoy intentando enviar correo desde una pantalla y al intentar la conexión me da el siguiente error:
...raised exception class EIdSocketError with message 'Socket Error # 11001 Host not found,', Process stopped.....
El código es el siguiente:
Código Delphi
[-]
procedure TFRMListados.EnviarMensaje(sUsuario, sClave, SHost, sAdjunto,
sAsunto, sDestino, sMensaje: String; sPort : Integer);
var
smtp : TIdSMTP;
begin
smtp := TIdSMTP.Create(nil);
smtp.Username := 'miusuario@gmail.com';
smtp.Password := 'miclave';
smtp.Host := 'smtp.gmail.com';
smtp.Port := 25;
smtp.AuthenticationType := atLogin;
smtp.Connect; -- Linea que da el error
También probé con el puerto 465.
Muchas gracias.