Title: Re: Upgrading to Entourage X
I sent a script with a typo; sorry! It is fixed below.


On or near 4/2/2003 4:54 PM, Allen Watson at [EMAIL PROTECTED] observed:

tell application "Microsoft Entourage"
    set hrs to (text returned of (display dialog "Delete items older than how many hours?" default answer "12")) as number
    set f to folder "Deleted Items" -- Alter for others
    set allOfEm to every message in f
    set cutOff to ((current date) - (hrs * hours))
    repeat with aMsg in allOfEm
        if time sent of aMsg is less than cutOff then delete aMsg
    end repeat
end tell


--
Microsoft MVP for Entourage/OE/Word (MVPs are volunteers)
Allen Watson <[EMAIL PROTECTED]> Entourage FAQ site: <http://www.entourage.mvps.org/>
AppleScripts for Outlook Express and Entourage:
 <http://members.thinkaccess.net/[EMAIL PROTECTED]/Scripts/>
Entourage Help Pages: <http://www.entourage.mvps.org/>

Reply via email to