|
| If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below. |
|
|||||||
|
|
Thread Tools | Search this Thread | Display Modes |
|
#1
October 21st 08, 12:48 PM
posted to microsoft.public.outlook.program_vba
|
|||
|
|||
Saving email attachments
I am using the following code, that runs from an outlook rule, to save
attachments to a path defined by the contents of the email body. For example in my email body I have the text string D:\ I receive an error despite the path and file looking OK. Help! Sub ANYPATH(itm As Outlook.MailItem) Dim objatt As Outlook.Attachment Dim SaveFolder As String SaveFolder = Trim(itm.Body) For Each objatt In itm.Attachments objatt.SaveAsFile SaveFolder & objatt.DisplayName Next Set objatt = Nothing End Sub 
|
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
| popup balloon on saving email attachments | vonClausowitz | Outlook and VBA | 3 | July 1st 08 05:00 PM |
| saving all attachments where the some of the attachments have thesame name | nosliwmada | Outlook - General Queries | 0 | December 6th 07 03:48 PM |
| quick code for saving email attachments | Co | Outlook - General Queries | 1 | November 29th 07 01:08 PM |
| default location for saving email attachments | Jeanette | Outlook - Installation | 2 | October 13th 06 06:25 PM |
| saving attachments | T | Outlook Express | 1 | April 16th 06 04:16 PM |
Threaded Mode