Error de tipo 554 al enviar correo.

[acl_gandalf]

Hola a tod@s, estoy haciendo un pequeño cliente de correo con el componente tnmsmpt de la paleta fastnet () pero me dice cuando le doy a enviar que hay recipientes vacios y no se por que puede ser, he probado a mandar a diferentes cuentas de correo desde diferentes cuentas de correo y en ningun caso he tenido exito, alguien sabe porquE?¿

Por cierto en el evento de RecipientNotfound del tnmsmtp al visualizar el recipiuiente que falta me indica


procedure TForm1.Button1Click(Sender: TObject);
begin
with NMSMTP1 do begin
Host := 'asmtp.aidico.es';
UserID := 'emisor@correo.es';
form1.Caption := 'Enviando...' ;
Application.ProcessMessages;
Port:=25;
Connect;
EncodeType:=uuMime;
PostMessage.FromAddress := 'emisor@correo.es';
PostMessage.FromName:='aaron';
PostMessage.ToAddress.Text := 'receptor@correo.es';
PostMessage.Subject :='prueba';
PostMessage.ToCarbonCopy.Text := '';
PostMessage.ToBlindCarbonCopy.Text := '';
PostMessage.Body.Text := 'prueba desde delphi';
try
SendMail;
form1.caption:= 'Enviado con éxito';
Except on e:exception do begin
form1.Caption := 'FALLO !!!' ;
showmessage('Ha habido un error de tipo '+ E.message);
Application.ProcessMessages;
end;
end;
Disconnect;
end;
end;

procedure TForm1.NMSMTP1Failure(Sender: TObject);
begin
showmessage('Error. No se ha enviado el mail');
end;

procedure TForm1.NMSMTP1Success(Sender: TObject);
begin
ShowMessage('Mensaje enviado correctamente');
end;

procedure TForm1.NMSMTP1RecipientNotFound(Recipient: String);
begin
ShowMessage('No hay recipinetes \ '+Recipient );
end;
end.

[acl_gandalf]

Bueno, me contesto a mi mismo. Después de investigar e investigar la mejor opción es hacerlo con los componentes Indy, ya que este permite autentificacion a nivel de usuario y contraseña y el fastnet al parecer solo a nivel de usuario.

No se si estare del todo en lo cierto respecto a lo que h dicho sobre el fastnet, pero sin duda al hacerlo cn las indy va.

[Crazyro]

Yo tengo hecho un metodo para enviar mail, pero pasa lo mismo, sólo autentica a nivel de usuario.

Si me dices que con las indy funciona a nivel de pass, las voy a ver ahora mismo y voy a modificar el código para hacerlo de esta manera.

salu2.

[zastilla]

alguno sabe como bajar el archivo adjunto usando las indy y ponerlo en una carpeta?
es posible saber si el correo lleva un adjunto solo con la cabecera(headers)?
gracias