Need help with VBS code to open Outlook

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

Patrick - 13 Sep 2005 22:36 GMT

Hi everyone!!
Quick question on the above code. Can I pass a text file to the body item.
Here is code:
============================
Dim ol, ns, newMail

Set ol = WScript.CreateObject("Outlook.Application")
Set ns = ol.getNamespace("MAPI")

Set newMail = ol.CreateItem(olMailItem)

newMail.Subject = "Testing sublect header"
newMail.TO="fakeaddresshere@Test.com"
newMail.Body = "testing body" -> **Here
newMail.DISPLAY
Set ol = Nothing

Could i say something like: newMail.Body=C:\test.txt

Meaning i would like to display in the body of this email the text included
inside that text file.

Can this be done?

Thx for all your help!!!

Reply to this Message

Eric Legault [MVP - Outlook] - 13 Sep 2005 22:50 GMT

You can with the Microsoft Scripting Library - use the TextStream object from
the FileSystemObject:

Dim objFS, objTS

Set objFS = CreateObject("Scripting.FileSystemObject")
Set objTS = objFS.OpenTextFile(strStationeryFilePath, 1, False)

newMail.Body = objTS.ReadAll
objTS.Close

Signature

Eric Legault (Outlook MVP, MCDBA, old school WOSA MCSD, B.A.)
Try Picture Attachments Wizard - http://www.collaborativeinnovations.ca
Blog: http://blogs.officezealot.com/legault/

> Hi everyone!!
> Quick question on the above code. Can I pass a text file to the body item.
[quoted text clipped - 21 lines]
>
> Thx for all your help!!!

Reply to this Message

Patrick - 14 Sep 2005 20:31 GMT

Thx for the hlp Eric, this works greate.

> You can with the Microsoft Scripting Library - use the TextStream object from
> the FileSystemObject:
[quoted text clipped - 32 lines]
> >
> > Thx for all your help!!!

Reply to this Message