>Ja consegui criar o email e enviar, mas como eu incluio um anexo? Estou indo por este caminho:
>
>o = CreateObject("outlook.application")
>x = o.CreateItem(0)
>x.Subject = "assunto"
>x.Body = "texto"
>x.Recipients.Add("juliano@mynarski.com.br")
>x.Send
>
>[]'s

Juliano:

Aqui tem um exemplo que escrevi no Wiki de VFP:
http://fox.wikis.com/wc.dll?Wiki~AutomationExamples~VFP

#DEFINE MAILITEM 0
#DEFINE IMPORTANCELOW 0
#DEFINE IMPORTANCENORMAL 1
#DEFINE IMPORTANCEHIGH 2

oOutLookObject = CreateObject("Outlook.Application")
oEmailItem = oOutLookObject.CreateItem(MAILITEM)

WITH oEmailItem
   .Recipients.Add("moe@3stooges.com") && uses the Recipients collection
   .Subject = "Automation sample"
   .Importance = IMPORTANCENORMAL
   .Body = "This is easy!"
   .Attachments.Add("c:\mydir\sample.txt") && Note that the fully qualified path and file is required.
   .Send
ENDWITH

RELEASE oEmailItem
RELEASE oOutLookObject

HTH