On 1/12/01 10:57 PM, Sherman Wilcox wrote:
> I also like to have two scripts for dealing with incoming messages:
>
> One opens the incoming message (useful when they're buried in nested folders
> and/or it's from someone important).
this script opens a message...
tell application "Microsoft Entourage"
set theMsg to item 1 of (get current messages)
open theMsg
end tell
> The other opens the incoming message and also sets it to be deleted from the
> server. I use it for messages from friends, whose messages I want to read
> immediately (but a rule routes them to a nested folder), and yet I
> invariably know that it's not something worth keeping on the server to pick
> up later at another location.
this script tells Entourage to delete message from the server...
tell application "Microsoft Entourage"
set currentMessages to the current messages
repeat with theMsg in the currentMessages
my ProcessMsg(theMsg)
exit repeat
end repeat
end tell
-- process the messages
on ProcessMsg(theMsg)
tell application "Microsoft Entourage"
-- delete email at next connection
if (connection action of theMsg) exists then
set (connection action of theMsg) to (remove at next connection)
end if
end tell
end ProcessMsg
--
To unsubscribe: <mailto:[EMAIL PROTECTED]>
To search the archives:
<http://www.mail-archive.com/entourage-talk%40lists.boingo.com/>