Open, fetch, and close

without the delay step the script is spinning the repeat loop very tight and would not be leaving much CPU time for Mailsmith to get the real work done.

For what it is worth here is a script I have developed (with help, thank you, from Christian Smith) to cycle through a list of email accounts. I have assumed the accounts have the "send mail when checking flag" set true so no separate command is used to send mail.

The motive was to allow each account to finish processing mail into the in box before starting another download of messages. This has improved the reliability of my mail in that I get less time out errors and therefore fewer repeat messages when the account is checked next time.

Adapt as needed.

Regards
Gavan

(see also the orginal version of the script)


on run
    try
        --start the application and setup list of mail account names
        tell application "Mailsmith 1.1"
            launch
            set accountList to name of mail accounts
        end tell
    on error
        -- nothin yet
    end try
    
    -- work through the list of accounts, and repeat this
    -- according to the number set below
    repeat 2 times
        repeat with theName in accountList
            CheckForMail(theName as string)
        end repeat
    end repeat
end run

to CheckForMail(AccountName)
    tell application "Mailsmith 1.1"
        -- do not attempt another account check if one is already in progress
        repeat while connection in progress
            -- do not hog the CPU while waiting for our time slot
            delay 10 -- seconds
        end repeat
        -- now start the mail account checking
        check mail using mail account AccountName
    end tell
end CheckForMail