HTML Outlook email
With AutoHotKey it is very easy to automate an HTML Outlook email! In the script below I show how to populate some of the common parameters of the object and insert HTML to the body as well as passing in a variable with time. You can easily tweak the settings to your needs.
#SingleInstance, Force Browser_Forward::Reload Browser_Back:: ;hotkey for running below olMailItem := 0 o:= ComObjActive("Outlook.Application").Session() MailItem := ComObjActive("Outlook.Application").CreateItem(olMailItem) MailItem.BodyFormat := 2 ; olFormatHTML MailItem.TO :="[email protected];[email protected]" ;~ MailItem.CC :="" ;~ MailItem.Replyto :="[email protected]" TodayDate := A_DDDD . ", " . A_MMM . " " . A_DD . ", " . A_YYYY ;storing pretty version of date MailItem.Subject := "email on " TodayDate ;Subject line of email ;***********html body of Outlook email******************* MailItem.HTMLBody := " <H2 style='BACKGROUND-COLOR: red'><br></H2> <HTML>Your file is here on "(TodayDate)" <br><br> <span style='color:black'>Please let me know if you have any questions. <br><br><a href='mailto:[email protected]'>Joe Glines</a> <br>214.567.3623 </HTML>" ;****************************** ;~ MailItem.Attachments.Add(NewFile) ;~ MailItem.Display ;Make email visible ;~ mailItem.Close(0) ;Creates draft version in default folder MailItem.Send() ;Sends the email Return
Here is a video walking through the usage of the above script.