Dica Para Salvar O Email Com Acbrmail

[renato.pavan]

Boa tarde,

 

Li no forum a pergunta de algum colega ao Jean se era possível salvar os emails enviado pelo ACBrMail.

 

Fiz uns testes aqui e salvei em formato eml que no meu caso abri com o Outlook 2010.

 

Na procedure SendMail, Logo abaixo da instrução:

fMIMEMess.EncodeMessage;

Coloquei o seguinte código:

fMIMEMess.Lines.SaveToFile('c:\' + fSubject + '.eml');

Deixei fixo o caminho porque foi só um teste, mas pode ser criado uma propriedade boleana para informar se deseja salvar e, em caso afirmativo um caminho para ser salvo a cópia ou até mesmo um stream para ser salvo em um blob no banco de dados.

 

Att.

[renato.pavan]

Só complementando a dica, este mesmo email pode ser reenviado apenas carregando o arquivo no objeto fMIMEMess:

fMIMEMess.Lines.LoadFromFile('caminho_do_arquivo');

Nos testes que fiz, ele mantem todos os destinatários, anexo, tudo como o email original.

 

Att.