Enviar email com anexo !

Question

Olaaa...Preciso enviar um email com um arquivo em anexo pelo outlookPensei em fzer algo tipo abrir o outolook e ja anexar automatico .Tem como fazer isso com o Delphi6.Obrigado...

Otto · Answer

esse exemplo foi dado pelo R�mulo[code:1:6496ed37a0] 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);[/code:1:6496ed37a0]veja oque vc pode aproveitar  :wink:...

F�rum Enviar email com anexo ! #286828