Kevin:

I think there was a typo in your message.

oBody = Appendtext(tcMessage)

produced a File appendtext.prg does not exist

while

oBody.Appendtext(tcMessage)

worked just fine

Thanks for the code. It's something I'll be able to use.

.........Rich


>
>Rich,
>
>I have been doing this stuff lately as well. To save you my heartache and time to figure out how to format the body of the message, the following works for me:
>
>

>oBody = loDoc.CreateRichTextItem("Body")
>
>tcMessage = "Contents of body which will now accept formatting"
>
>oBody = Appendtext(tcMessage)
>

>
>And you can now remove the line:
>loDoc.ReplaceItemValue("Body", tcBody)
>For as simple as this was, took a while for me to figure out. Might be a better way, but I'm figuring it out as I go!
>HTH
>Kevin