tell application "Microsoft Entourage"
set sourceFolder to folder "Inbox"
set destinationFolder to "Old Mail"
set messageAge to 3 * days
set theMessages to every message of sourceFolder whose time received is less than ((current date) - messageAge)
count theMessages
if theMessages is not {} then
repeat with aMessage in theMessages
move aMessage to destinationFolder
end repeat
end if
end tell
Remove the line that says “count theMessages” - that was only in there for testing. It won’t do any harm, just take up a few more processor cycles.
--
Barry Wainwright
<http://www.barryw.net/>
"Anyone who lives within their means suffers from a lack of imagination." -- Oscar Wilde
