Off the top of my head (so there may be bugs):
#DEFINE wdFormatHTML 8
oWord = createobject("Wod.Application")
oDoc = oWord.Documents.Open("myReport.doc")
lcHTMLFile = "MyReport.Htm"
oDoc.SaveAs(lcHTMLFile,wdFormatHTML)
oDoc.Close()
That should give you the HTML. You can then use FiletoStr to get the file into a variable that you assign to the HTMLBody property of Outlook.
HTH.
>>>Hi all,
>>>
>>>Is there a way to put a word file in the body of a mail ?.
>>>I ask this because i was trying to put an html file in the body of Outlook and is fine, but I discovered the with frx2word of John, generates a best file in word, but I don´t know how to put this file into the body of a mail in Outlook 2000 and if it´´s possible.
>>>
>>>TIA
>>
>>Outlook can be configured to handle plain text or HTML in the body. I think you are going to have to add the Doc file as an attachment.
>>#DEFINE olMailItem 0
>>#DEFINE olByValue 1
>>oOutlook = createobject("Outlook.Application")
>>oMail = oOutlook.CreateItem(olMailItem)
>>oAttachment = oMail.Attachments.Add("myreport.doc",olByValue)
>Thanks Larry,
>
>The problem is that I need to put the doc in the body of thr mail, I´ve tried frx2word and obtain a better .doc file than .html file, because of this I´m looking how to put the .doc in the body.
>I was looking to open the doc in a word object and save as html file so then I can put in Outllok htmlbody, but I can´t do that because of my poor knowledge of managing word from VFP.
>
>Thanks again.
Larry Miller
MCSD
LWMiller3@verizon.netAccumulate learning by study, understand what you learn by questioning. -- Mingjiao