Script: Toggle all schedules

[Allen Watson]

Title: Script: Toggle all schedules

Wrote this for myself the other day, and I'm finding it useful. If you have several schedules, and ever want to quickly turn them all off (and back on later), this little script will do it:


property toggleoff : true
property activeScheds : {}
tell application "Microsoft Entourage"
    if toggleoff then
        set activeScheds to every schedule whose enabled is true
        repeat with aSched in activeScheds
            set enabled of aSched to false
        end repeat
        set toggleoff to false
        display dialog "Schedules DISABLED"
    else
        repeat with aSched in activeScheds
            set enabled of aSched to true
        end repeat
        set toggleoff to true
        display dialog "Schedules ENABLED"
    end if
end tell

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