Enviar email com anexo !

Delphi

04/07/2005

Olaaa...
Preciso enviar um email com um arquivo em anexo pelo outlook

Pensei em fzer algo tipo abrir o outolook e ja anexar automatico .
Tem como fazer isso com o Delphi6.

Obrigado


Somar

Somar

Curtidas 0

Respostas

Otto

Otto

04/07/2005

esse exemplo foi dado pelo Rômulo


 email := ´mailto:´+dm.tb00Email.value+´?subject=PPP&body=Segue em anexo PPP do funcionário ´+dm.tb01NOME.value+´.&file="´+SaveDialog1.Filename+´"´; 
      shellapi.ShellExecute( 0, ´open´, pChar(email), nil, nil, SW_SHOWNORMAL);


veja oque vc pode aproveitar :wink:


GOSTEI 0
POSTAR