Ajudem a enviar email
Eis o meu código
porém não funciona:
begin
with IdMessage1 do
begin
Body.Assign(Memo1.Lines);
From.Text := ´nome@yahoo.com.br´;
Recipients.EMailAddresses := EdDestinatarios.text;
Subject := EdAssunto.Text;
CCList.EMailAddresses := EdCc.Text;
end;
IdPOP31.Host := ´pop.mail.yahoo.com.br´;
IdPOP31.Username := ´nome´;
IdPOP31.Password := ´senha´;
IdPOP31.Connect; IdSMTP1.Host:=´smtp.mail.yahoo.com.br´;
IdSMTP1.Port:= 25; IdSMTP1.AuthenticationType := atLogin;
IdSMTP1.Username := ´nome´; IdSMTP1.Password := ´senha´; IdSMTP1.Connect;
try
IdSMTP1.Send(IdMessage1);
except
on E: Exception do
MessageDlg(E.Message, mtError, [mbOK], 0);
end;
IdPOP31.Disconnect;
end;
Será que alguém pode me ajudar.
porém não funciona:
begin
with IdMessage1 do
begin
Body.Assign(Memo1.Lines);
From.Text := ´nome@yahoo.com.br´;
Recipients.EMailAddresses := EdDestinatarios.text;
Subject := EdAssunto.Text;
CCList.EMailAddresses := EdCc.Text;
end;
IdPOP31.Host := ´pop.mail.yahoo.com.br´;
IdPOP31.Username := ´nome´;
IdPOP31.Password := ´senha´;
IdPOP31.Connect; IdSMTP1.Host:=´smtp.mail.yahoo.com.br´;
IdSMTP1.Port:= 25; IdSMTP1.AuthenticationType := atLogin;
IdSMTP1.Username := ´nome´; IdSMTP1.Password := ´senha´; IdSMTP1.Connect;
try
IdSMTP1.Send(IdMessage1);
except
on E: Exception do
MessageDlg(E.Message, mtError, [mbOK], 0);
end;
IdPOP31.Disconnect;
end;
Será que alguém pode me ajudar.
Jujan
Curtidas 0
Respostas
Massuda
21/12/2005
1) Qual erro está informando?
2) Faltou desconectar do servidor SMTP.
2) Faltou desconectar do servidor SMTP.
GOSTEI 0
Jujan
21/12/2005
Dá uma mensagem de erro dizendo que não possivel fazer o log in, porém quando eu vou no site do yahoo e coloco meu login e senha funciona.
GOSTEI 0
Massuda
21/12/2005
Seu código parece estar correto, mas acho que os nomes dos servidores do Yahoo não tem o .br (talvez eu esteja enganado).
GOSTEI 0
Martins
21/12/2005
Seu código parece estar correto, mas acho que os nomes dos servidores do Yahoo não tem o .br (talvez eu esteja enganado).
Tem o br sim, vc não é o único a ter dores de cabeça com isso, agora veja uma coisa, vc precisa configurar seu e-mail yahoo para ser acessado externamente.
Se ainda não está configurado, você precisará entrar nas ´Opções do Yahoo! Mail´ > ´Acesso POP e Redirecionamento´.
Escolha a opção ´Web e acesso POP´.
Veja o link abaixo:
[url]http://help.yahoo.com/help/br/mail/pop/pop-02.html[/url]
GOSTEI 0
Jujan
21/12/2005
Pelo gmail ou pelo ig é o mesmo processo eu tenho que configurar no email para poder acessar a conta externamente no meu via aplicação.
Agradeço a ajuda
Jujan
Agradeço a ajuda
Jujan
GOSTEI 0
Martins
21/12/2005
Pelo gmail ou pelo ig é o mesmo processo eu tenho que configurar no email para poder acessar a conta externamente no meu via aplicação.
Agradeço a ajuda
Jujan
Disponha!!!
GOSTEI 0