The Eudora mailbox challenge...
The Eudora mailbox challenge...
- Subject: The Eudora mailbox challenge...
- From: Christopher Stone <email@hidden>
- Date: Thu, 17 Jul 2003 02:25:17 -0500
At 20:48 +0100 07/16/2003, John Delacour wrought:
There is also no way, using Eudora's dictionary, to create a new mailbox
and have it appear immediately in the menu. There is a way to do it,
but my challenge of two months standing remains unanswered and I'm not
talking.
______________________________________________________________________
Huh? I must have missed that challenge. I thought we solved that one a
couple of years ago...
----------------------------------------------------------------------
tell application "Eudora"
try
file of mailbox "Mailbox_ccs"
beep
display dialog "STOP!" & return & return & "Mailbox already exists!"
with icon 0
return
end try
set f to file of mailbox 0
end tell
tell application "Finder"
try
set mFldr to container of f as alias
set dsk to disk of mFldr
set f to (make new file at dsk with properties {name:"Mailbox_ccs",
file type:"TEXT", creator type:"CSOm"}) as alias
tell application "Eudora"
open {f}
close window "Mailbox_ccs"
open mailbox "Mailbox_ccs"
set bounds of window "Mailbox_ccs" to {0, 44, 998, 527}
end tell
update mFldr
delay 1
move f to mFldr with replacing
on error
beep 2
end try
end tell
----------------------------------------------------------------------
This critter is a bit awkward, but you _have_ to move the mailbox into
Eudora's mail folder for it to be available after quitting and
re-launching Eudora.
Best Regards,
Christopher Stone
_______________________________________________
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.