Re: Save from Eudora
Re: Save from Eudora
- Subject: Re: Save from Eudora
- From: Cornwall <email@hidden>
- Date: Thu, 15 Nov 2001 18:06:50 -0800
At 7:24 AM -0600 11/15/01, Jim Brandt wrote:
>
How does one save a message from Eudora to a disk file?
I looked at Eudora's dictionary, but couldn't see how to save
directly. However something like this will work. If there is a more
direct way to do it someone will probably chime in - especially if
this is the "wrong" answer.
HTH
Corny
--tested
tell application "Eudora"
set thrall to message 1 of mailbox "AppleScript Users"
set sub to subject of message 1 of mailbox "AppleScript Users"
end tell
if (characters 1 thru 3 of sub) as string is "Re:" then
set sub to (characters 5 thru -1 of sub) as string
end if
if (count of characters in sub) is greater than 31 then
set sub to ((characters 1 thru 30 of sub) as text) & "
"
end if
set newFil to (path to desktop folder as string) & sub
set filRef to open for access file newFil with write permission
write thrall to filRef
close access filRef