Trabalho na Câmara Municipal e vc?

 

  _____  

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Guilherme Ventura de Souza
Enviada em: terça-feira, 1 de setembro de 2009 15:06
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Erro ao enivar e-mail

 

  

Eu tbm sou =PP
trabalha aonde?
----- Original Message ----- 
From: Eduardo Silva 
To: delphi...@yahoogrup <mailto:delphi-br%40yahoogrupos.com.br> os.com.br 
Sent: Tuesday, September 01, 2009 2:49 PM
Subject: RES: [delphi-br] Erro ao enivar e-mail

Sim, pq?

_____ 

De: delphi...@yahoogrup <mailto:delphi-br%40yahoogrupos.com.br> os.com.br
[mailto:delphi...@yahoogrup <mailto:delphi-br%40yahoogrupos.com.br>
os.com.br] Em
nome de Guilherme Ventura de Souza
Enviada em: terça-feira, 1 de setembro de 2009 08:46
Para: delphi...@yahoogrup <mailto:delphi-br%40yahoogrupos.com.br> os.com.br
Assunto: Re: [delphi-br] Erro ao enivar e-mail

Lpnet? O.o

Me intrometendo totalmente =P
você é de Lençóis cara?

----- Original Message ----- 
From: Eduardo Silva 
To: delphi...@yahoogrup <mailto:delphi-br%40yahoogrupos.com.br> os.com.br 
Sent: Tuesday, September 01, 2009 8:41 AM
Subject: RES: [delphi-br] Erro ao enivar e-mail

// Meu servidor SMTP

NMSMTP1.Host := dmSIAEAP01.tblSIAECONFNM_SERVIDOR.AsString; //
'bbs.lpnet.com.br';

// Porta SMTP, não pode ser alterada

NMSMTP1.Port := dmSIAEAP01.tblSIAECONFNR_PORTA.AsInteger; // 25

// Nome de login do usuário

NMSMTP1.UserID := dmSIAEAP01.tblSIAECONFNM_LOGIN.AsString; // 'manos';

// Conecta ao servidor

NMSMTP1.Connect;

// Se ocorrer algum erro durante a conexão com o servidor, avise!

if not NMSMTP1.Connected then

raise Exception.Create('Erro de conexão');

// Marca a posição atual do registro na tabela

Posicao := dmSIAEAP01.tblSIAE0101.Bookmark;

// Desabilita os controles Dataware

dmSIAEAP01.tblSIAE0101.DisableControls;

dmSIAEAP01.tblSIAE0101.First;

while not dmSIAEAP01.tblSIAE0101.Eof do

begin

if dmSIAEAP01.tblSIAE0101NM_EMAIL.AsString <> '' then

begin

Endereco := dmSIAEAP01.tblSIAE0101NM_EMAIL.AsString;

with NMSMTP1.PostMessage do

begin

// Seu e-mail

FromAddress := dmSIAEAP01.tblSIAECONFNM_EMAIL.AsString;
// 'edua...@lpnet. <mailto:%27eduardo%40lpnet.com.br> com.br';

// Seu nome

FromName := dmSIAEAP01.tblSIAECONFNM_NOME.AsString;
// 'Eduardo de Almeida Silva';

ToAddress.Clear;

// E-mail do(s) destinatário(s)

ToAddress.Add(Endereco); // colocar aqui o endereço de
quem vai receber o e-mail

// Assunto da mensagem

Subject := edtAssunto.Text; //'Teste de envio de e-mail
através do delphi';

// Corpo da mensagem

Body.Clear;

Body.Add(memoMensagem.Lines.Text);

// Anexar arquivos

// Attachments.Clear;

// Endereço do anexo

Attachments.AddStrings(Listbox.Items);

// Attachments.Add(ListBox.Items.Text);

// Manda o e-mail

NMSMTP1.SendMail;

end;

end

dmSIAEAP01.tblSIAE0101.Next;

end;

// Desconecta do servidor

NMSMTP1.Disconnect;

// Habilita os controles Dataware

dmSIAEAP01.tblSIAE0101.EnableControls;

// Volta a tabela na posição em que estava

dmSIAEAP01.tblSIAE0101.Bookmark := Posicao;

_____ 

De: delphi...@yahoogrup <mailto:delphi-br%40yahoogrupos.com.br> os.com.br
[mailto:delphi...@yahoogrup <mailto:delphi-br%40yahoogrupos.com.br>
os.com.br] Em
nome de Vinicius
Enviada em: terça-feira, 1 de setembro de 2009 08:35
Para: delphi...@yahoogrup <mailto:delphi-br%40yahoogrupos.com.br> os.com.br
Assunto: RES: [delphi-br] Erro ao enivar e-mail

Passe a sua rotina, derepente esta faltando algum detalhe que vc não esta
percebendo.

-----Mensagem original-----
De: delphi...@yahoogrup <mailto:delphi-br%40yahoogrupos.com.br> os.com.br
[mailto:delphi...@yahoogrup <mailto:delphi-br%40yahoogrupos.com.br>
os.com.br] Em
nome de Eduardo Silva
Enviada em: terça-feira, 1 de setembro de 2009 08:17
Para: delphi...@yahoogrup <mailto:delphi-br%40yahoogrupos.com.br> os.com.br
Assunto: RES: [delphi-br] Erro ao enivar e-mail

O destinatário é válido.

Não sei mais o que pode estar acontecendo.

-----Mensagem original-----
De: delphi...@yahoogrup <mailto:delphi-br%40yahoogrupos.com.br> os.com.br
[mailto:delphi...@yahoogrup <mailto:delphi-br%40yahoogrupos.com.br>
os.com.br] Em
nome de Leandro
Enviada em: segunda-feira, 31 de agosto de 2009 17:34
Para: delphi...@yahoogrup <mailto:delphi-br%40yahoogrupos.com.br> os.com.br
Assunto: Re: [delphi-br] Erro ao enivar e-mail

sim, q vc tem q adicionar pelo menos um destinatario valido..

2009/8/31 Eduardo Silva <eduko...@yahoo. <mailto:edukobra%40yahoo.com.br>
com.br>

>
>
> Galera, tentei enviar um e-mail usando o componente NMSMTP e deu o
seguinte
> erro
>
> 554 REFUSED - YOU MUST SPECIFY AT LEAST ONE VALID RECIPIENT
>
> Alguém sabe me dizer que erro é esse?
>
> Uso o delphi 5, então tem que ser o NMSMTP mesmo.
>
> [As partes desta mensagem que não continham texto foram removidas]
>
> 
>

-- 
Leandro, MuTukA

[As partes desta mensagem que não continham texto foram removidas]

------------------------------------

-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

------------------------------------

-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

[As partes desta mensagem que não continham texto foram removidas]

[As partes desta mensagem que não continham texto foram removidas]

[As partes desta mensagem que não continham texto foram removidas]

[As partes desta mensagem que não continham texto foram removidas]





[As partes desta mensagem que não continham texto foram removidas]

Responder a