A Microsoft Outlook email forum. Outlook Banter

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.

Go Back   Home » Outlook Banter forum » Microsoft Outlook Email Newsgroups » Outlook and VBA
Site Map Home Register Authors List Search Today's Posts Mark Forums Read Web Partners

Can you automat saving attachments and emails to a directory



 
 
Thread Tools Search this Thread Display Modes
  #1  
Old November 30th 07, 09:47 PM posted to microsoft.public.outlook.program_vba
JadeKeiran
external usenet poster
 
Posts: 1
Default Can you automat saving attachments and emails to a directory

I've been using a macro similar to the one Alan posted here a couple years
ago. I ran into some problems when the company migrated from XP to Vista.
The code is still digitally signed, but Outlook appears to be ignoring the
script in the rule that calls it. I've set break points in the code but none
of them seem to fire.
I know that the rule is running, because it's executing the move to specify
folder and mark as read features of it.

Any ideas why Outlook 2007 would be ignoring breakpoints or script code all
together?

-Keiran

"Alan" wrote:

"Neil1958" wrote in message
...

Open Inbox
Click on the new Email
Click on Marco which runs the following
Detaches any attachment in the Email to a set directory
Saves the text of the email to the same directory and a txt file or
doc.

or could all the above be automated more by having the email do the
above as in arrived in the inbox as new mail. Set formated emails
only for do this.


Hi Neil,

To save the emails to a folder, just drag them across and copy or move
them. They will come across as MSG files which are fully functional
outlook items that can be opened and then forwarded or replied to just
like any other email in outlook.

Try this to save attachments (change the path to suit).

+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+

Sub ExtractAttachments()

Dim MyItem As MailItem
Dim MyAtt As Attachment


Set SelectedItems = ActiveExplorer.Selection


For Each MyItem In SelectedItems

For Each MyAtt In MyItem.Attachments

MyAtt.SaveAsFile "D:\Temp\" & MyAtt.DisplayName

Next

Next

End Sub


+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+




Ads
 




Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

vB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Forum Jump

Similar Threads
Thread Thread Starter Forum Replies Last Post
Saving Attachments Phil Dawes Outlook Express 3 August 28th 06 02:13 PM
saving attachments T Outlook Express 1 April 16th 06 05:16 PM
saving attachments tom Outlook - General Queries 2 April 10th 06 06:17 PM
Saving a dbx file as a directory of eml files? JMF Outlook Express 8 March 2nd 06 01:55 PM
Saving Attachments [email protected] Add-ins for Outlook 0 January 11th 06 08:27 PM


All times are GMT +1. The time now is 12:17 PM.


Powered by vBulletin® Version 3.6.4
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.Search Engine Friendly URLs by vBSEO 2.4.0
Copyright ©2004-2025 Outlook Banter.
The comments are property of their posters.