Re: Schedules: another feature request

[Allen Watson]

Title: Re: Schedules: another feature request

On 6/26/02 10:36 AM, I wrote:

          You could do something that combines your two requests, actually. First, write a script
          that deletes everything 2 days old or more in a folder and any subfolders within it. Then,
          set up a schedule to run that script daily. The script would be something like this:
          
          tell application "Microsoft Entourage"
              set listFolder to folder "Lists"
              set folderList to {listFolder} & (every folder of listFolder)
              set twoDaysAgo to (current date) - (2 * days)
              repeat with f in folderList
                  delete (every message in f where its time sent < twoDaysAgo)
              end repeat
          end tell
          
          The “where its” clause works in OS X; I don’t think it will work in OS 9. I tested this
          using “open” instead of “delete”, and with an extra line that let me cancel after two
          folders...and it worked. I have not tested with the delete, but I believe it will work.
          
Just noticed on another list a note from Paul B saying delete does not work with lists, and that’s a feature request. So, you will have to replace that “delete” line above with:

    set msgList to every message in f where its time sent < twoDaysAgo
    repeat with m in msgList
        delete m
    end repeat

If you want the messages to be permanently deleted, rather than just moved to Deleted Items, then repeat the “delete m” line.
--
My web page: <http://home.earthlink.net/~allenwatson/>
My scripts page: <http:homepage.mac.com/allenwatson>
Microsoft MVP for Mac Entourage/Word--<[EMAIL PROTECTED]>