#INCLUDE Outlook.h LOCAL oOutlook AS Outlook.Application LOCAL oEmail AS Outlook.MailItem LOCAL cAttachment AS String LOCAL cRecipient AS String oOutlook = CREATEOBJECT("Outlook.Application") oEmail = oOutlook.CreateItem(OL_MAILITEM) cAttachment = LOWER(ADDBS(SYS(5) + SYS(2003)) + "test.jpg") cRecipient = "kevin@marois-consulting.com" WITH oEmail .To = cRecipient .Subject = "Test Email" .Body = "This is the body" .Attachments.Add(cAttachment, OL_ATTACH_TYPE_EMBED) .Send() ENDWITH RETURN