Re: Eudora: sending to more than 50 recipients
Re: Eudora: sending to more than 50 recipients
- Subject: Re: Eudora: sending to more than 50 recipients
- From: Will Gosney <email@hidden>
- Date: Tue, 23 Oct 2001 20:12:43 -0400
At 4:11 PM -0700 10/23/01, Chris Page wrote:
[Sent to me privately, but I'll answer this on the list.]
nigh on 2001.10.23 3:43 PM, Will Gosney at email@hidden wrote:
Is there a way to get the palm desktop to send email via Eudora vs
Emailer? I have Eudora set as the default in Internet config?
If you look in the Palm Desktop scripts folder you'll see a script named
something like "Create ClarisEmailer Message". Make a copy of that, then
modify it to create messages using Eudora instead of Emailer, then assign
that script to the e-mail field (using the pop-up menu to the right of the
field).
The next version of Palm Desktop will use a more generic script that uses
the Internet preferences to determine which mail program to use. For your
convenience, here's a copy of that script (note that I'm releasing this
without warranty or support):
Chris & All
Please bear with me as I am new to applescripting. When I try to
open the Create ClarisEmailer Script using the script editor, it
requests that I locate Claris Emailer V1.1 which I do not have. How
do I get past that?
using terms from application "Palm Desktop"
When I checked the syntax of your new script, a syntax error dialog
box came up saying "A identifier can't go after this identifier."
referring to "using terms"
set fullName to full name of address 0
at "name" , "expected end of line, etc. but found property. &
"expected end of line, etc. but found number.
set emailAddr to text of address 0
end using terms from
if (emailAddr is "" and fullName is "") then
-- if there is no e-mail address or name, go ahead and create an empty
-- address URL, which will create an empty message with no address.
-- Alternatively, could change this to exit the script, to do nothing.
set emailAddr to "mailto:"
else
-- if the address starts with "mailto:" or contains name delimiters
-- ('<>', '()', '""') assume it is exactly the way the user wants it and
-- don't alter it. Otherwise, try to add the user name to the address.
if emailAddr does not start with "mailto:" then
if not (emailAddr contains "<" or emailAddr contains "(" or \
emailAddr contains "\"") then
set emailAddr to fullName & "<" & emailAddr & ">"
end if
set emailAddr to "mailto:" & emailAddr
end if
end if
-- Replace characters not allowed in URLs with their hex encoding
set replacementChars to {{" ", " "}, {"<", "<"}, {">", ">"}}
repeat with replaceItem in replacementChars
set emailAddr to replaceText(emailAddr, item 1 of replaceItem, \
item 2 of replaceItem)
end repeat
-- Create a new message with the address, using the user's preferred mail
-- application
open location emailAddr
-- A utility function to replace one sub-string with another
on replaceText(theText, findStr, replaceStr)
set OldDelims to AppleScript's text item delimiters
set AppleScript's text item delimiters to findStr
set newText to text items of theText
set AppleScript's text item delimiters to replaceStr
set newText to newText as text
set AppleScript's text item delimiters to OldDelims
return newText
end replaceText
Thanks so much
Will