Send HTML formatted email
I need to send an HTML formatted email. Eventually I will send it from an
ASP page that looks at a SQL database. The email is another way to send the
ASP page report.
Below is what someone posted here and I use already, but I also need the
addition of inserting an HTML file. I can manually send the HTML file by
choosing insert, file and then choosing "as text" for an HTML file, but I
need to do this programatically and have not found it yet.
"Robert" <email@example.com> wrote:
> Dim oOApp As Outlook.Application
> Dim oOMail As Outlook.MailItem
> Set oOApp = CreateObject("Outlook.Application")
> Set oOMail = oOApp.CreateItem(olMailItem)
> With oOMail
> .To = "firstname.lastname@example.org"
> .Subject = "email subject"
> .Body = "email message"
> .Attachments.Add "\\server\drive\folder\filename", olByValue, 1
> End With