Boa tarde a todos,
Estou desenvolvendo uma aplicação que deve enviar um e-mail com um arquivo
em anexo, estou usando dois componentes o IDSMTP eo IDMESSAGE.
Mas quando mando executar o componente aparece o seguinte erro: RECIPIENT
REJECTD.
Tente enviar com a configuração do UOL, IG e BOL... Alguém conhece este
componente pode me ajudar???
begin
IdMessage1.From.Address:= dm.QconexaoCON_USERID.Value; //email do
remetente... [EMAIL PROTECTED]
IdMessage1.From.Name:= dm.QempresaEMP_NOME.Value; // nome do
remetente... Andre
IdSMTP1.Host:= dm.QconexaoCON_HOST.Value; // servidor...
smtp.servidor.com.br
IdSMTP1.Username:= dm.QconexaoCON_USUARIO.Value; // usuario...
garciaand
IdSMTP1.Password:=dm.QconexaoSENHA.Value; //senha... *****
IdMessage1.Recipients.EMailAddresses:= dm.QemailMAIL_EMAIL.Value; //
endereca para quem... [EMAIL PROTECTED]
IdMessage1.Subject:= edit1.text; // assunto...
IdMessage1.Body:= Memo1.Lines; // mensagem...
TIdAttachment.Create(IdMessage1.MessageParts,TFileName('C:\codeSED\Movimento.txt'));//
arquivo a ser anexado...
IdSMTP1.Connect;
try
IdSMTP1.Send(IdMessage1);
Finally
IdSMTP1.Disconnect;
end;
Application.MessageBox('Email enviado com
sucesso!','Confirmação',MB_iconinformation+mb_ok);
end;
Gostaria de saber se a linha de anexar tb está ok, pois peguei esta linha
de codigo em um artigo.
TIdAttachment.Create(IdMessage1.MessageParts,TFileName('C:\codeSED\Movimento.txt'));//
arquivo a ser anexado...
FICO NO AGUARDO DA AJUDA DOS CONPANHEIROS...
Atenciosamente;
André
--
<<<<< 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
