Buscar por:

Email pelo delphi em provedores que exigem autenticação.

Código

Analizando as dicas para envio de email que já foram postadas, aprendi muita coisa, foi a partir daí que quando surgiu a necessidade de enviar email via programa, eu apanhei um monte e venho complementar aquilo que tinha me faltado no passado.

No Delphi 6

Usar o componente NMSMTP:

Na propriedade Host deve ser colocado o endereço do provedor de email. Exemplo:

Bol - > usar "smtp.bol.com.br"

Brturbo - > Usar "smtp.brturbo.com"

Cada provedor tem seu servidor de email.

A propriedade User Id é o endereço de email que quem tá mandando vai usar para conectar-se ao provedor.

Supondo que meu email seja  egon.klipstein@bol.com.br, o que devo usar como UserId é "egon.klipstein", pois o provedor só envia emaisl para alguem que seja cliente dele, e o que fazemos, é acionar o mecanismo de email de um provedor...

Detalhadamente:

Parindo do princípio que o nome do componente seja NMSMTP:

NMSMTP.Host:='smtp.bol.com.br';

NMSMTP.UserId:='egon.klipstein';

NMSMTP.Postmessage.Body.Text:='Aqui vai o texto do Email';

NMSMTP.PostMessage.Attachments.Text:='Anexo.doc'; 

NMSMTP.PostMessage.FromAddress:='egon.klipstein@bol.com.br';

NMSMTP.PostMessage.ToAddress.Text:='samadruga@bol.com.br';

NMSMTP.PostMessage.Subject:='Teste de envio de email';

Porém existem alguns provedores que exigem a autenticação do usuário que está efetuando o envio de email, como o componente NMSMTP não possui nenuma senha, temos que usar outro componente, o NMPOP3.

NMPOP3.host:='pop3.bol.com.br';

NMPOP3.UserId:='egon.klipstein';

NMPOP3.Password:='senha do email';

Para executar o envio de email use:

NMPOP3.Conect;

NMSMTP.Conect;

NMSMTP.Sendmail;

NMSMTP.Disconect;

NMPOP3.Disconect;

Erros mais frequentes:

No Valid Recipient - É porque o endereço de email não existe.

Null Remote Addres - É porque o Host de algum dos componentes não existe, o provedor.

Autentication Needed - A senha ou o UserId está errado.

Aconselhável monitorar o retorno dessas funções.