Re: Eudora scripts
Re: Eudora scripts
- Subject: Re: Eudora scripts
- From: Rob Jorgensen <email@hidden>
- Date: Sun, 24 Mar 2002 10:56:12 -0500
On 3/24/02, Applescript User Lewis commented:
At 11:27 -0500 21/02/02, David Groover wrote:
tell application "Eudora"
activate
make message at end of mailbox "Out"
tell message ""
set field "to" to pTheAddress
set field "subject" to thetest
end tell
end tell
The scripting dictionary for Eudora implies that make can be used to
make any class element:
make: Make a new element
make
new type class -- the class of the new element.
But I've only ever seen it used for making a message. Can I make a
Mailbox>? And if so, how do I set the name of the mailbox?
I don't think it's possible to make a new Eudora mailbox in that
manner but it can be done in other ways (with caveats). The following
snippets will create a new mailbox, named "!temp", which will be
visible in the Finder but not visible to Eudora. They both do the
same thing but one method uses Eudora to create the new mailbox file
while the other uses the Finder.
-- Begin script snippet by good ol' John Delacour --
tell application "Eudora"
set n to -1 * (length of (get setting 8916)) - 1
set {mailFolder, box} to ,
{text 1 through n of ("" & (get file of mailbox 1)), "!temp"}
end tell
open for access file (mailFolder & box)
close access result
tell application "Eudora"
open {alias (mailFolder & box)}
end tell
-- End script snippet by good ol' John Delacour --
-- Begin script snippet by good ol' Christopher C. Stone --
tell application "Eudora"
-- get the path to *your* mail folder
set euFl to (get file of mailbox 1) as string
set defaultDelimiters to AppleScript's text item delimiters
set AppleScript's text item delimiters to {":"}
set euFl to text items 1 thru -2 of euFl
set euFl to euFl as string
set AppleScript's text item delimiters to defaultDelimiters
euFl
end tell
tell application "Finder"
-- create a new mailbox file in the mail folder
set nf to make file at folder euFl with properties ,
{name: "!temp", creator type:"CSOm", file type:"TEXT"}
open nf
end tell
-- End script snippet by good ol' Christopher C. Stone --
The problem is that Eudora won't immediately realize that the mailbox
has been created. This means that until Eudora has been
quit/restarted:
-- The new mailbox won't show up in the list of mailboxes.
-- The new mailbox cannot be referred to via AppleScript (for
example, you won't be able to tell Eudora to create a message in, or
move a message to, the new mailbox)
On the other hand, after running the scripts above, messages can be
dragged to and from the open window of the newly created mailbox
without quitting/restarting Eudora.
I'll be glad to hear that I'm wrong about this but everything that
I've archived on this topic indicates that this info is still
accurate.
--
Later,
Rob Jorgensen
Ohio, USA
_______________________________________________
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.