View Single Post
 
Old July 16th, 2007, 03:28 PM
allenm allenm is offline
Friend of Wrox
Points: 513, Level: 8
Points: 513, Level: 8 Points: 513, Level: 8 Points: 513, Level: 8
Activity: 0%
Activity: 0% Activity: 0% Activity: 0%
 
Join Date: Feb 2007
Location: Davenport, IA, USA.
Posts: 163
Thanks: 0
Thanked 2 Times in 2 Posts
Default

Not sure how you are sending eMail, however I'd suggest instantiating an Outlook object and sending the mail in Outlook natively.

First, Add the resource "Microsoft Outlook 11.0 Object Library" (Or whatever Outlook object library you have). The code will be:
-------------------------------------------------------------------
Dim MailObj as Outlook.MailItem
MailObj = Outlook.Application.CreateItem(olMailItem)
With MailObj
  .To = "Who@Where.Com"
  .CC = "Whoelse@Whereelse.Com"
  .Subject = "The Subject (HTML Format)"
  .BodyFormat = olFormatHTML
  .HTMLBody = "HTML Content"
  .Display 'Can be .Send but prompts for user intervention before sending without 3rd party software like ClickYes
End With
-------------------------------------------------------------------