Como anexar arquivos no cliente padr�o de e-mail??? (navoid)

Question

o c�digo abaixo abre o cliente de e-mail padr�o com alguns campos preenchidos com valores pre-definidos, mas estou querendo anexar um arquivo qualquer...alguem sabe como seria????procedure envia_email...

Flaviodfp · Answer

Tente isto. Funcionou comigo. Voce vai ter q usar o componente NMSMTP da paleta FastNet

NMSMTP1.Host := �host.blabla.com.br�;
NMSMTP1.UserId := �usuario�;
NMSMTP1.Connect;
NMSMTP1.PostMessage.FromAddress := �meemail@blabla.com.br�;
NMSMTP1.PostMessage.ToAddress.Text := �alguem@hotmail.com�;
NMSMTP1.PostMessage.Body.Text := �Teste de envio dos arquivos�;
NMSMTP1.PostMessage.Attachments.Text := �C:\autoexec.bat�;
NMSMTP1.PostMessage.Subject := �Teste de envio�;
NMSMTP1.SendMail;
NMSMTP1.Disconnect;