socorro envio de email

Question

O QUE ACONTECE QUANDO TENTO ENVIAR UMA MENSAGEM VIA DELPHI NO ACESSO DISCADO E O SIS FUNCIONA PERFEITAMENTE E NA ADSL ELE ME RETORNA O ERRO ........

NO VALID RECIPIENTS .........

JA CONFERI E VERIFIQUEI VARIOS CODIGOS MAIS PARECE QUE NADA FUNCIONA ....

VALEU +++++++

Favor postar o t�tulo em min�sculas
Moderador

Lfernando · Answer

qual o c�digo que voc� colocu para ele enviar a mensagem?
Foi para ele enviar via Dial Up?
Para se mandar via Adsl o c�digo n�o � outro?
Se for voc� poderia fazer uma verifica��o da conex�o e depois habilitar o servi�o a ser usado.

:shock:

Anonymous · Answer

if not NMSMTP1.Connected then
begin
Panel2.Caption := �Enviando a mensagem ...�;
NMSMTP1.Host := Smtp;
NMSMTP1.UserID := UserId;
NMSMTP1.Connect;
// Dados do remetente.
NMSMTP1.PostMessage.FromAddress := Email; // De - email
NMSMTP1.PostMessage.FromName := Origem; // De - Nome
NMSMTP1.PostMessage.Subject := Assunto; // Assunto
NMSMTP1.PostMessage.ToAddress.Add(MailDest); // Para
NMSMTP1.PostMessage.ToBlindCarbonCopy.Add(EmailFabri); // C�pia oculta - Cco
NMSMTP1.PostMessage.ToCarbonCopy.Add(��); // Com c�pia - Cc
NMSMTP1.PostMessage.Body.Assign(Memo2.Lines); // Corpo do email
NMSMTP1.SendMail; // Envia o email
Panel2.Caption := �Mensagem enviada com sucesso ...�;
end
;

Anonymous · Answer

T� um tanto quanto repetitivo esse dilema do ENVIO DE EMAIL PELO DELPHI, talvez seja melhor o Clube Delphi colocar como Dicas e Macetes:

1- O componentes delphi para Envio/Recebimento de E-mail s�o, respectivamente, NMSMTP e NMPOP3, da paleta Fastnet;

2- Por si s�, o componente NMSMTP deveria prover o envio de e-mail, bastando setar suas vari�veis HOST, USERID adequadamente;

3- Ocorre que alguns PROVEDORES DE ACESSO exigem PRIMEIRO autentica��o no servidor POP3 (de recebimento de e-mails), como � o caso do BRTURBO, do UOL, do YAHOO, e parece que a onda pegou e todos os provedores dever�o ter o mesmo procedimento...

4- Para enviar adequadamente e-mails pelo Delphi, devemos driblar essa limita��o dos Provedores, setando as Vari�veis HOST, USERID e PASSWORD em um componente NMPOP3, fazendo ent�o a conex�o primeiro nele e depois fazendo a conex�o no componente NMSMTP.

5- A� dever� funcionar, a menos que: A Senha/Usuario esteja errada, o nome do servidor esteja errado ou fora do ar etc.

6- Tenho um exemplo que funciona tanto em DIAL UP (Discado) quanto em ADSL (Brasil Telecom - BRTURBO), quem quiser, pe�a-me por e-mail no endere�o joilson_gouveia@yahoo.com.br

T+

Fabiomx · Answer

MESMO COM O EXEMPLO QUE VC ME ENVIOU POR EMAIL N�O FUNCIONA ... DA O MESMO ERRO ... JA TINHA FEITO IGUAL AO SEU E FUNCIONA PERFEITAMENTE POR ACESSO DISCADO ... MAIS N�O SEI PORQUE PELA ADSL N�O FUNCIONA ...

Anonymous · Answer

Mande-me o SEU FONTE...joilson_gouveia@yahoo.com.br...

Fabiomx · Answer

� O QUE FOI JA POSTADO ACIMA ... MAIS MESMO COM O EXEMPLO QUE VC ME MANDOU ONTEM N�O FUNCIONA ..........

Anonymous · Answer

Acabei de testar o seu c�digo acima, colocando as linhas abaixo, e funcionou. Aten��o para os par�metros que usei:

[b:9a41e13ff7]NMPOP31.Host := �pop.brturbo.com�;
NMPOP31.UserId := �joilson_gouveia�;
NMPOP31.Password := �******�;
NMPOP31.Conect;
if not NMPOP31.Conected then
begin
ShowMessage(�N�o consegui conex�o POP3!�);
Exit;
end;
NMSMTP1.Host := �smtp.brturbo.com�;
NMSMTP1.UserId := �joilson_gouveia�;
NMSMTP1.Conect;[/b:9a41e13ff7]
if not NMSMTP1.Connected then
begin
Panel2.Caption := �Enviando a mensagem ...�;
//NMSMTP1.Host := Smtp;
//NMSMTP1.UserID := UserId;
//NMSMTP1.Connect;
// Dados do remetente.
NMSMTP1.PostMessage.FromAddress := �joilson_gouveia@brturbo.com��; // De - email
NMSMTP1.PostMessage.FromName := �Joilson Vieira Gouveia�; // De - Nome
NMSMTP1.PostMessage.Subject := Assunto; // Assunto
NMSMTP1.PostMessage.ToAddress.Add(�joilson_gouveia@yahoo.com.br�); // Para
NMSMTP1.PostMessage.ToBlindCarbonCopy.Add(�joilson_gouveia@bol.com.br�); // C�pia oculta - Cco
//NMSMTP1.PostMessage.ToCarbonCopy.Add(��); // Com c�pia - Cc
NMSMTP1.PostMessage.Body.Assign(Memo2.Lines); // Corpo do email
NMSMTP1.SendMail; // Envia o email
Panel2.Caption := �Mensagem enviada com sucesso ...�;
end
;