Email Attachment with Outlook

How can I attach a file to my email using the object OUTLOOK?
lohvinenkoAsked:
Who is Participating?
 
vmanoConnect With a Mentor Commented:
Sub NewMailWithAttachment()
' The Outlook object library needs to be referenced
 Dim ol As Outlook.Application
 Dim NewMessage As Object

 Set ol = New Outlook.Application
 ' Create a new MailItem
 Set NewMessage = ol.CreateItem(olMailItem)
 ' Embed a file into the new message
 NewMessage.Attachments.Add "c:\autoexec.bat", olByValue
 ' Display the message
 NewMessage.Display
End Sub

hope this helps
vmao

0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.