Automating Outlook from Access

[RMittelman]

Hi,
I have an Access (2007) database which creates Outlook (also 2007) email messages using VBA, using code such as the following (skipping some code for brevity):

Dim oOutlook As Outlook.Application
Dim oMsg As Outlook.MailItem
Dim oRecipient As Outlook.Recipient
Dim oAttachment As Outlook.Attachment

Set oOutlook = New Outlook.Application        
Set oMsg = oOutlook.CreateItem(olMailItem)
With oMsg
    .Display
    Set oRecipient = .Recipients.Add(to_item)
    .subject = subject
    .Body = msgBody    
    .Importance = olImportanceNormal
End With

This used to work fine until I changed my access form to use a rich text box to display things like email addresses and URLs properly.
In the above code, msgBody is a String variable storing the value of the RichTextBox control.

Now my email message looks like the following, including the html codes.

<div>Here are the latest list in PDF format. &nbsp;You will need the Adobe Reader to open this file. &nbsp;Download it for free at <a


href="http://get.adobe.com/reader/">http://get.adobe.com/reader/</a></div>
<div>&nbsp;</div>
<div>Verify names are correct, and let me know if any problems. &nbsp;</div>

The outlook message is already set to display as an HTML message. I tried changing this to a RichText message, but to no avail.

Does anybody know how to properly get the rich text into the outlook message body using VBA, so it will show up properly?

Thanks...

[RMittelman]

Follow-up:

I notice there is a .HTMLBody property to the outlook message object. When I use this, the message now contains the text only, with <div>, etc tags not visible.

Problem with this is that the message no longer looks correct. My default font is replaced with Times New Roman, and my signature style, including font, size and colors is negated, also appearing in Times New Roman.

A possible solution is to strip all the HTML codes from the text before supplying it to the message's .Body property. Any ideas?

Thanks...