Email Attachment with Outlook

Posted on 1998-12-16
Medium Priority
Last Modified: 2010-08-05
How can I attach a file to my email using the object OUTLOOK?
Question by:lohvinenko
1 Comment

Accepted Solution

vmano earned 200 total points
ID: 1450552
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
End Sub

hope this helps


Featured Post

Free Tool: IP Lookup

Get more info about an IP address or domain name, such as organization, abuse contacts and geolocation.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

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.

Join & Write a Comment

I’ve seen a number of people looking for examples of how to access web services from VB6.  I’ve been using a test harness I built in VB6 (using many resources I found online) that I use for small projects to work out how to communicate with web serv…
Background What I'm presenting in this article is the result of 2 conditions in my work area: We have a SQL Server production environment but no development or test environment; andWe have an MS Access front end using tables in SQL Server but we a…
Get people started with the utilization of class modules. Class modules can be a powerful tool in Microsoft Access. They allow you to create self-contained objects that encapsulate functionality. They can easily hide the complexity of a process from…
Show developers how to use a criteria form to limit the data that appears on an Access report. It is a common requirement that users can specify the criteria for a report at runtime. The easiest way to accomplish this is using a criteria form that a…

627 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question