Boa tarde,

Alguém já tentou utilizar o me Save da classe tMailMessage ?

Quando utilizo ele salva o arquivo vazio sem dados.

MailMsgSave := tMailMessage():New()

MailMsgSave:Clear()

MailMsgSave:cFrom := cFrom

MailMsgSave:cTo := cEmails

MailMsgSave:cCC := cCopia

MailMsgSave:cBcc := ''

MailMsgSave:cSubject := cAssunto

MailMsgSave:cBody := cMensagem

MailMsgSave:MsgBodyType( "text/html" )

IF Len(aAttach) > 0

For nX := 1 To Len(aAttach)

if file( aAttach[nX] )

MailMsgSave:AttachFile( aAttach[nX] )

EndIF

Next nX

EndiF

MailMsgSave:Save( "\workflow\SaveEmails\" + FWUUIDV1(.T.) + ".eml")