Hola, estoy intentando que mi aplicacion envie un email (practicando un poco) y me da este error:
'530.5.7.0 Must issue a STARTTLS command first'
el codigo es este:
Código:
NMSMTP1.Port:=25;
NMSMTP1.Host:='smtp.gmail.com';
NMSMTP1.UserID:= 'userid' ;
if not (NMSMTP1.Connected) then
NMSMTP1.Connect;
NMSMTP1.PostMessage.FromAddress := 'email';
NMSMTP1.PostMessage.FromName := 'nombre';
NMSMTP1.PostMessage.Attachments.Text := 'ruta_al_archivo';
NMSMTP1.PostMessage.Body.Text:= 'Prueba';
NMSMTP1.SendMail;
NMSMTP1.Disconnect;
¿Sabe alguien porque me pasa?He provado a cambiar la propiedad EncodeType de NMSMTP a uuMime y a uuCode, no se me ocurre nada mas.
Un saludo y gracias.