Re: Getting the location of mailboxes from mail/Eudora
Re: Getting the location of mailboxes from mail/Eudora
- Subject: Re: Getting the location of mailboxes from mail/Eudora
- From: B&b Software <email@hidden>
- Date: Fri, 9 Feb 2007 17:42:04 +1100
Dear Kai,
Many thanks for taking the time to respond and
for your help. your code is most useful.
Thanks again ... Tim
While you've had some responses regarding
Eudora, it looks from your code as if you're
also interested in a similar suggestion for Mail
- in which case you might like to try something
like the following handler:
-------------
on alias_file for m
if m's class is «class mbxp» then
set e to "mbox"
else
set e to "mbox/Messages/" & m's id & ".emlx"
set m to m's «class mbxp»
end if
set n to "/" & (m as record)'s «class seld» & "."
tell m's «class mact» to if exists then
set p to its «class path»
if its «class atyp» is not
«constant etocetpo» then set n to n & "imap"
else
tell application "System Events"
set p to value of property list item "AccountPath" of ¬
property list
item 1 of property list item "MailAccounts" of ¬
property list
file (preferences folder's POSIX path &
"/com.apple.mail.plist")
if p starts with "~" then
set p to home folder's POSIX path & p's text 2
thru -1
end tell
end if
p & n & e as POSIX file as alias
end alias_file
tell application "Mail"
set msg to beginning of (get selection)
set mbx to msg's mailbox
end tell
{alias_file for mbx, alias_file for msg}
-------------
---
kai
_______________________________________________
Do not post admin requests to the list. They will be ignored.
AppleScript-Users mailing list (email@hidden)
Help/Unsubscribe/Update your Subscription:
Archives: http://lists.apple.com/mailman//archives/applescript-users
This email sent to email@hidden