Obrigado pela dica, Vou testar.
----- Original Message -----
From: "Rodrigo Ribeiro" <[EMAIL PROTECTED]>
To: <delphi-br@yahoogrupos.com.br>
Sent: Monday, January 24, 2005 9:00 AM
Subject: Re: [delphi-br] Enviar Email p/ delphi 6
>
> Use o componente TNMPOP3, passando para o componente nome de usuário e
> senha. Depois execute o comando CONNECT do componente. Antes de prosseguir
> com a rotina de envio de e-mail, verfique se o componente POP3 está de
fato
> conectado....
>
> Mais ou menos assim (o código abaixo foi tirado do histórico do fórum):
>
> //Processo de reconhecimento no POP3 do UOL
> NMPOP31.AttachFilePath := '.';
> NMPOP31.DeleteOnRead := FALSE;
> NMPOP31.ReportLevel := Status_Basic;
> NMPOP31.TimeOut := 20000;
> NMPOP31.Host := 'pop.uol.com.br';
> NMPOP31.Port := 110;
> NMPOP31.UserID := 'MeuLogin';
> NMPOP31.Password := 'Minha Senha';
> NMPOP31.Connect;
> //Conexão não feita ele sai
> //Conexão feita ele desconecta e prossegue
> if not NMPOP31.Connected then exit else NMPOP31.Disconnect;
> //Prosseguindo ele agora tenta se conectar ao SMTP do UOL
> NMSMTP1.ClearParams := TRUE;
> NMSMTP1.Host := 'smtp.uol.com.br'
> NMSMTP1.Port := 25;
> NMSMTP1.UserID := 'MeuLogin'
> NMSMTP1.Connect;
> //Conexão não feita ele sai
> //Conexão feita ele prossegue
> If not NMSMTP1.Connected then exit;
> //Processo de envio
> NMSMTP1.PostMessage.Body.Clear;
> NMSMTP1.PostMessage.ToAddress.Clear;
> NMSMTP1.PostMessage.FromAddress := '[EMAIL PROTECTED]'
> NMSMTP1.PostMessage.FromName := 'Meu Nome Completo'
> NMSMTP1.PostMessage.Body.Add('Teste de envio de email');
> NMSMTP1.PostMessage.Subject := ('Teste de Envio');
> NMSMTP1.PostMessage.ToAddress.Add('[EMAIL PROTECTED]');
> NMSMTP1.SendMail;
>
> [ ]'s e Boa Sorte
>
> Rodrigo
>
> ----- Original Message -----
> From: "Pedro Vagner Rossi" <[EMAIL PROTECTED]>
> To: <delphi-br@yahoogrupos.com.br>
> Sent: Monday, January 24, 2005 7:32 AM
> Subject: [delphi-br] Enviar Email p/ delphi 6
>
>
> >
> > Olá a todos.
> >
> > Eu uso o componente TNMSMTP para enviar mensagens pelo Delphi.
> > Alguém sabe como enviar mensagem qdo se usa um servidor que requer
> > autenticação de senha para envio?
> >
> >
> > Obrigado
> >
> >
> > Pedro Vagner Rossi
> >
> >
> >
> > --
> > <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
> >
> > Para ver as mensagens antigas, acesse:
> > http://br.groups.yahoo.com/group/delphi-br/messages
> >
> > Para falar com o moderador, envie um e-mail para:
> > [EMAIL PROTECTED] ou [EMAIL PROTECTED]
> >
> > Links do Yahoo! Grupos
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
>
>
>
>
> --
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
>
> Para ver as mensagens antigas, acesse:
> http://br.groups.yahoo.com/group/delphi-br/messages
>
> Para falar com o moderador, envie um e-mail para:
> [EMAIL PROTECTED] ou [EMAIL PROTECTED]
>
> Links do Yahoo! Grupos
>
>
>
>
>
>
>
>
>
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
