Enviar e-mail pelo outloock

Delphi

30/11/2004

Salve pessoal, quem é vivo sempre aparece!!!!

Estou precisando de uma dica:

Preciso mandar e-mails usando o outloock, estes e-mail´s estarao em formato html anexados. Ou seja, nao irei mandar nada no corpo, apenas no anexo. Posso ter n anexos (cada anexo um arquivo html).

Alguem tem alguma coisa que poderia me ajudar?

muito obrigado desde já colegas!!!!!!!

abraço;


Rfpsatin

Rfpsatin

Curtidas 0

Respostas

Rfpsatin

Rfpsatin

30/11/2004

certo, deixa explicar melhor.

Estou usando o seguinte componente:
http://www.scalabium.com/

TSMMAPIMail

e estou testando com o seguinte codigo

procedure TForm1.Button3Click(Sender: TObject);
begin
with TMAPIMail.Create(Self) do
try
Subject := ´teste do ricardo´;
Body := ´isto eh um teste - ricardo´;
Recipients.Add(´conta@yahoo.com.br´);
SenderAddress:=´teste@teste.com´;
Recipients.Add(´CC:conta2@yahoo.com.br´);
Recipients.Add(´BCC:conta3.francisco@gmail.com´);
Attachments.Add(´D:\ricardo\index.html´);
Attachments.Add(´D:\ricardo\index2.html´);
EditDialog := True;
Send
finally
Free
end;

end;


-----------

tudo bem, esta mandando perfeitamente!!!! contudo o que preciso eh o segunte.

mandar em anexo n arquivos e ele mostrar um abaixo do outro no corpo do email!

entendido?

tipo assim, se eu mando um email sem body, ele me monstra na tela o 1o. arquivo que esta anexado. Se soh tenho 1 ele mostra, se tenho + q 1 ele nao mostra nada. Se no yahoo p.ex vc abre um email desta forma, com n anexos, ele mostra um abaixo do outro no CORPO do e-mail.

Como faço isso?

um abraco pessoal!


GOSTEI 0
POSTAR