Using AppleScript to auto-archive mail in Outlook 2011

Question

I want to use AppleScript to set up a schedule to auto-archive mail greater than X days old. What I've found so far is below, and the error I'm receiving is "error "Microsoft Outlook got an error: Can’t get pop account \"TargetProcess\"." number -1728 from pop account "TargetProcess"".
# the time we want to archive from
set theArchiveCutoffTime to ((current date) - (32 * days))
property theCount : 0
tell application "System Events"
  set targetProcess to count (every application process whose name is "Mail")
end tell
tell application "Microsoft Outlook"
  set thisAccount to pop account "TargetProcess"
  set thisFolders to mail folder of thisAccount
# find the "Inbox" of topFolder and "Mail ARCHIVE" of on my computer
  repeat with thisFolder in thisFolders
  if name of thisFolder is "Inbox" then
  set theInbox to thisFolder
  else if name of thisFolder is "Mail ARCHIVE" then
  set theARCHIVE to thisFolder
  end if
  end repeat
# find the archive "Inbox"
  repeat with thisFolder in mail folder of theARCHIVE
  if name of thisFolder is "Inbox" then
  set theArchiveInbox to thisFolder
  end if
  end repeat
  set theArchiveTarget to theArchiveInbox
# archive the Inbox
  repeat with theMessage in message in theInbox
  if time received of theMessage < theArchiveCutoffTime then
  move theMessage to theArchiveTarget
  set theCount to theCount + 1
  else
  # we get messages from oldest to newest
  exit repeat
  end if
  end repeat
# archive sub-folders
  repeat with thisSubfolder in mail folder of theInbox
  # find the archive subfolder corresponding to this
  repeat with thisARCHIVEubfolder in mail folder of theArchiveInbox
  if name of thisARCHIVEubfolder is name of thisSubfolder then
  set theArchiveTarget to thisARCHIVEubfolder
  end if
  end repeat
  # archive messages
  repeat with theMessage in message in thisSubfolder
  if time received of theMessage < theArchiveCutoffTime then
  move theMessage to theArchiveTarget
  set theCount to theCount + 1
  else
  # we get messages from oldest to newest
  exit repeat
  end if
  end repeat
  end repeat
end tell
I'm working in AppleScript Editor v2.6.1 (152.1), Microsoft Outlook 2011 v14.3.5, OSX 10.9.4 Mavericks.

Answer 1

Ok, red_menace above me had a shorter and more elegant solution to the question, I'm adding this just for another example.
To solve your problem I'd make a mail rule that looked for any messages with "Filename:" in them (along with whatever criteria you wanted, like sender, domain, etc). The mail rule would execute the Applescript. My assumption is that the "Filename:foobar" text could be anywhere in the email, not necessarily the first thing in a paragraph, so I had to parse it differently.
The results end up in a datalist, (theFilename {} ) that you can parse later to collect all filenames found in whatever messages were processed.
I realize this could be cleaner, hope it's not hard to follow, but I did it really fast. It works flawlessly for me, picking out the name of the file no matter where in the email it appears.
using terms from application "Mail"
on perform mail action with messages theSelectedMessages for rule theRule
repeat with aCounter from 1 to count theSelectedMessages
set theMessage to item aCounter of theSelectedMessages
set theContent to content of theMessage
set theWords to every word of theContent
set theFilename to {}
set tid to AppleScript's text item delimiters
set AppleScript's text item delimiters to ":"
repeat with thisLoop in theWords
try
if (text item 1 of thisLoop) is "Filename" then
set end of theFilename to (text item 2 of thisLoop)
-- rest of your logic goes here the display is just to show it finds the filename, take it out!
display dialog theFilename ¬
buttons {"OK"}
end if
end try
end repeat
set AppleScript's text item delimiters to tid
end repeat
end perform mail action with messages
end using terms from
Message was edited by: stephen.bradley Typos for the win!