Re: Scripting Eudora personalities
Re: Scripting Eudora personalities
- Subject: Re: Scripting Eudora personalities
- From: "Dr. Max Bonilla" <email@hidden>
- Date: Mon, 14 Oct 2002 10:58:00 -0500
Thank you!
Max
At 9:55 pm -0300 11/10/02, Bill Briggs wrote:
At 4:22 PM -0500 11/10/02, Dr. Max Bonilla wrote:
You say it is possible, pray tell!
A good demonstration of the weird syntax Eudora sometimes requires.
The conventional approaches don't work, so it's little wonder you
couldn't get it. At least the dictionary is accurate, so there is a
clue there to what you have to do.
tell application "Eudora"
set newmessage to (make message at end of mailbox "Out" of
mail folder "")
set pRef to a reference to personality "DesiredPersonality"
set personality of newmessage to pRef
--set field "To" of newmessage to "some nickname"
end tell
It doesn't need to be that complicated. Even if you have a mailbox
named "Out" in another mail folder, you don't need to specify the
folder. The alternative, mailbox 2, is also better, since it does
not depend on the user's localizations.
tell app "Eudora"
set msg to make message at end of mailbox 2
set personality of msg to personality "Direct"
end
I don't find the syntax weird in either case.
Here is a script that will allow you to change the personality of
all queued messages. I most commonly use two personalities, but I
often need to send mail from personality (a) through the SMTP server
of personality (b) and vice versa, depending on which ISP I am
connected to. It's easy enough to select all queued messages and
batch change their personality using the Message/Change/Personality
menu item, but this script automates the process.
tell app "Eudora"
set ls to {}
repeat with i from 1 to count personalities
set end of ls to name of personality i
end
set prompt_ to "Set personality of queued messages to..."
choose from list ls with prompt prompt_
set p to result as string
repeat with i from 1 to 100
set i to -1 * i
set msg to (a reference to message i of mailbox 2)
if status of msg is in {sendable, queued} then
try
set personality of msg to personality p
end
else
exit -- no need to continue loop
end
end
end
-- JD
PS. If our very stupid list software inserts "JJJJJJ" in places,
just delete them. I see our administrator has no intention to
improve the way these lists behave. It would be easy enough, so I
don't think he gives a damn.
_______________________________________________
applescript-users mailing list | email@hidden
Help/Unsubscribe/Archives:
http://www.lists.apple.com/mailman/listinfo/applescript-users
Do not post admin requests to the list. They will be ignored.
_______________________________________________
applescript-users mailing list | email@hidden
Help/Unsubscribe/Archives:
http://www.lists.apple.com/mailman/listinfo/applescript-users
Do not post admin requests to the list. They will be ignored.