• Home
 · 
• Internet/HTML
 · 
• Send email with attachment with Microsoft Outlook 2007 & 2003!

Send email with attachment with Microsoft Outlook 2007 & 2003!

Send email with attachment with Microsoft Outlook 2007 & 2003!

API Declarations


' Just make sure that Microsoft Outlook 2000 or 2003 is installed.
' Outlook Error parser by: Elton House



Rate Send email with attachment with Microsoft Outlook 2007 & 2003!

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

Function SendMail(Recipient, MailSubject, TextBody, FileAttachment)
Set Outlook = CreateObject("Outlook.Application")
Set OutlookMail = Outlook.CreateItem(0)
Set Attachment = OutlookMail.Attachments
OutlookMail.To = Recipient
OutlookMail.Subject = MailSubject
OutlookMail.Body = TextBody
Attachment.Add FileAttachment, 1, 1, "File Attachment"
'OutlookMail.Send
OutlookMail.Display
SendKeys "%{s}", True
End Function