Fórum Anexar um arquivo e envia-lo por email! #178581

30/08/2003

0

Caros amigos, tenho um sistema, e nesse sistema todos os dias ao final do expediente, ele precisa anexar um arquivo pre-determinado e envia-lo por email... A parte de enviar o email, eu ja consegui, mas ainda não sei como anexar o arquivo... Se alguem pudesse me ajudar ficaria muito grato... Obs.: Estou desenvolvendo em Delphi 7.


Neguete

Neguete

Responder

Posts

30/08/2003

Alysson

isso é fácil. nos códigos tem uma parte Attachments.


ai, se eu me lembro bem, digita smtp.attachments.add(´alysson.jpg´)


tenta assim aonde:
SMTP = nome do seu component SMTP
alysson.jpg = O arquivo.

*** posso ter errado ao escrever, n to com delphi 6 aberto...... :wink:


Responder

Gostei + 0

30/08/2003

Neguete

Bom, eu consegui a resposta.. o código para anexar no delphi 7 eh esse..

TIdAttachment.create(IdMessage.MessageParts, TFileName(´c:\Arquivo.txt´));

onde:
IdMessage = nome do seu componente IdMessage
´c:\Arquivo.txt´ = endereço do arquivo a ser anexado..


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar