Send Email Via Outlook

[ken gray]

Here's how I got it to work.

Macro Send Email Via Outlook

Code:

Copy      Help

typelib Outlook {00062FFF-0000-0000-C000-000000000046} 9.4
Outlook.Application oolApp._create
Outlook.MailItem email=oolApp.CreateItem(0)
email.Recipients.Add("address@somewhere.com")
str MailBody.getfile("$desktop$\Document.html")

;Send the Email
email.Subject = "test"
email.HTMLBody = MailBody
email.Send