Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- (*
- Move email to Processed folder
- Original code from http://forgetmenotes.blogspot.com/2011/01/mac-outlook-2011-keyboard-shortcut-to.html
- *)
- on run {}
- tell application "Microsoft Outlook"
- -- listSelectedItems : a list of all items selected in Entourage
- set listMessages to current messages
- -- Check to make sure items are selected, if not then quit
- if ((count of listMessages) < 1) then return
- -- Iterate through selected items
- repeat with objInSelection in listMessages
- set listFolders to mail folders
- repeat with objFolder in listFolders
- if (name of objFolder is "Processed") then
- set gtdFolder to objFolder
- end if
- end repeat
- if (class of account of objInSelection is not imap account) then
- -- IMAP currently not supported
- move objInSelection to gtdFolder
- end if
- end repeat
- end tell
- end run
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement