Ok, I figured out what I was doing wrong in regards to the SaveAs Method.
The syntax is different than in Access and Excel. I have been able to save a
file with with a predetermined name to the harddrive. The Message body is
blank however, what code am I missing to select and save the message body
also?

Here is the code listed below:

Sub saveemail(myItem As Outlook.MailItem)
Dim m As MailItem
Set m = CreateItem(olMailItem)
m.SaveAs "c:\temp\New Power Indices.html", olhtml
End Sub

"Michael Bauer [MVP - Outlook]" wrote:



Simply call the item's Save method. There should be an example in the VBA
help file.

--
Best regards
Michael Bauer - MVP Outlook

: Outlook Categories? Category Manager Is Your Tool
: VBOffice Reporter for Data Analysis & Reporting
: http://www.vboffice.net/product.html?pub=6&lang=en


Am Wed, 5 Nov 2008 08:28:00 -0800 schrieb TerryM:

I've seen quite a few questions asking this on the web, however I have not
seen an answer to it.

I am trying to create an outlook rule that will run on these criterias,
By sender--Easily done in the Outlook rule
By Subject--Easily done in the Outlook rule
run as script--Saves email message as either text or Html to a harddrive.
From there I will do an import into either excel or access to get the
information i need.

So basically what I am trying to find is the script to save the email
message (no attachments) to a hard drive.