Fórum Problema - envio de e-mail com Delphi5 - componentes FastNet #227968
26/04/2004
0
Estou usando Delphi 5, e componente NMSMTP da paleta FastNet, e depois de funcionar algum tempo, derrepente tive problemas para enviar e-mail.
As msg´s são as seguintes:
1- Recipient ´endereco@dominio.com.br´ not found
2- 503 Command DATA rejected: no valid rcpt fields
Inclusive, usei o próprio exemplo do Delphi depois que começou a dar erro, mas acontece a mesma coisa.
Quem puder ajudar, agradeço muito!
Obrigado,
Wellprog
Curtir tópico
+ 0Posts
26/04/2004
Otto
procedure TForm1.Button1Click(Sender: TObject); begin NMSMTP1.Host := ´mail.horadocafezinho.com´; NMSMTP1.UserID := ´´; NMSMTP1.Port := 25; NMSMTP1.Connect; NMSMTP1.PostMessage.FromAddress := ´de@lalala.com´; NMSMTP1.PostMessage.ToAddress.Text := ´para@lalala.com´; NMSMTP1.PostMessage.Subject := ´Assunto´; NMSMTP1.PostMessage.Body.Text := Memo1.Lines.Text; try NMSMTP1.SendMail; except MessageBox(handle, ´Erro ao enviar a mensagem !´,´ERRO´,+mb_ok+mb_iconerror); end; //try NMSMTP1.Disconnect; // apesar de tudo desconecte; end;
e da erro?
Gostei + 0
26/04/2004
Wellprog
procedure TForm1.Button1Click(Sender: TObject); begin NMSMTP1.Host := ´mail.horadocafezinho.com´; NMSMTP1.UserID := ´´; NMSMTP1.Port := 25; NMSMTP1.Connect; NMSMTP1.PostMessage.FromAddress := ´de@lalala.com´; NMSMTP1.PostMessage.ToAddress.Text := ´para@lalala.com´; NMSMTP1.PostMessage.Subject := ´Assunto´; NMSMTP1.PostMessage.Body.Text := Memo1.Lines.Text; try NMSMTP1.SendMail; except MessageBox(handle, ´Erro ao enviar a mensagem !´,´ERRO´,+mb_ok+mb_iconerror); end; //try NMSMTP1.Disconnect; // apesar de tudo desconecte; end;
-----------------------------------------
Sim, mas estou especificando UserID também como UserID := ´endereco@dominio.com.br´.
Gostei + 0
26/04/2004
Otto
Gostei + 0
26/04/2004
Otto
begin NMSMTP1.Host := ´mail.horadocafezinho.com´; NMSMTP1.UserID := ´otto@horadocafezinho.com´; NMSMTP1.Connect; //Inicia a conecção; NMSMTP1.PostMessage.FromAddress := ´otto@horadocafezinho.com´; NMSMTP1.PostMessage.ToAddress.Text := ´teste@horadocafezinho.com´; NMSMTP1.PostMessage.Body.Text := ´Mensagem enviada pelo prog.´; NMSMTP1.PostMessage.Subject := Oi, aqui foi pelo Delphi´; try NMSMTP1.SendMail; //Envio do e-mail; ShowMessage(´E-Mail Enviado !´); except ShowMessage(´Deu pau. Não foi...´); end; //try NMSMTP1.Disconnect; end;
Gostei + 0
26/04/2004
Wellprog
Port := 25;
Host := ´mail.avantti.com.br´;
UserID := ´suporte@avantti.com.br´;
PostMessage.FromAddress := ´suporte@avantti.com.br´ ;
PostMessage.FromName := ´Suporte Avantti´;
valeu!
Gostei + 0
26/04/2004
Otto
deu tudo certinho ai?
Gostei + 0
26/04/2004
Wellprog
eu disse valeu, pela ajuda desde já, mas o erro é o mesmo.
Gostei + 0
26/04/2004
Otto
Gostei + 0
26/04/2004
Wellprog
Gostei + 0
26/04/2004
Otto
Gostei + 0
06/05/2004
Infohelp
Gostei + 0
06/05/2004
Otto
idSMTP1.AuthenticationType := atLogin;
qualquer duvida em relação ao uso do componente indy pra enviar email posta aqui ou da uma pesquisada que vc vai achar altas coisas...
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)