Inserting Rich Text into Lotus Notes Email

[AccessNub]

Hi All,

I have been sending plain text emails for a while, but now I have a project where the formatting of the text needs to be specific and I need to send as rich text.

I can use the rich text from a table, excel, or word, but I am at a loss on how to get the data to Lotus Notes.

Any ideas? TIA

 

[AccessNub]

No sooner than I ask, I figured it out....

Here is what is needed to make the body your HTML

Dim stream As Object
Set stream = MBSession.CreateStream
Set body = MailDoc.CreateMIMEEntity
Call stream.WriteText("Place HMTL Code Here")
Call body.SetContentFromText(stream, "text/html;charset=iso-8859-1", ENC_IDENTITY_8BIT)