Re: How to just grab email addresses?

Tech-Archive recommends: Repair Windows Errors & Optimize Windows Performance



On 2/15/06 4:51 PM, in article
1140051110.937179.29650@xxxxxxxxxxxxxxxxxxxxxxxxxxxx, "Pitch"
<pitchblackcoffee@xxxxxxxxx> wrote:

I need to export ONLY the email addresses of everyone in a Custom View
(about 1600) and export them into a text doc separated only by a comma.

Is there a script or method out there that will do that?

I'm working in Entourage 2004.

If you can accept "Full Name <emailaddress@xxxxxxxxxx>", separated by commas,
then do this:

In the Custom View, select a contact, press cmd-A to select All.

Click "Add Group" button in the toolbar. Name the group, Save and close.

In the Address Book, select the new group. Do NOT open it. Press cmd-C (Copy).

In TextEdit or any text window anywhere, cmd-V (Paste).

Done.

(If you prefer to have the items separated by line endings, then instead of
copy-paste, just drag the group to the text window and drop.)


To get ONLY the default email address, you'd have to do it by script:

-------------------

set newFile to choose file name with prompt "Enter a name and location for the
text file:" default name "Email addresses.txt" default location (path to
desktop)
tell application "Microsoft Entourage"
set theContacts to (get the selection)
set eAddresses to {}
repeat with theContact in theContacts
try
set end of eAddresses to default email address of theContact
end try
end repeat
set AppleScript's text item delimiters to {","}
set eAddresses to eAddresses as string
set AppleScript's text item delimiters to {""}
end tell

try
close access newFile
end try
set f to open for access newFile with write permission
set eof f to 0
write eAddresses to f
close access f

tell application "TextEdit"
open newFile
activate
end tell

------------------------------------



If what you really meant was that you wanted the email addresses separated by
a comma and a space (, ) then add a following space in this line:

set AppleScript's text item delimiters to {","}

to read:

set AppleScript's text item delimiters to {", "}


If you don't want to open the file, remove the last 4 lines of the script. You
can also change the default name of the file in the first line.


Is there a script that can find email addresses in the body of messages?

Relevant Pages

  • Re: How to just grab email addresses?
    ... and export them into a text doc separated only by a comma. ... To get ONLY the default email address, you'd have to do it by script: ... set end of eAddresses to default email address of theContact ... set AppleScript's text item delimiters to ...
    (microsoft.public.mac.office.entourage)
  • Grabbing all email addresses
    ... then running the script where it would add all the ... set theContacts to ... set end of eAddresses to default email address of theContact ... set f to open for access newFile with write permission ...
    (microsoft.public.mac.office.entourage)
  • Re: How to just grab email addresses?
    ... To get ONLY the default email address, you'd have to do it by script: ... set theContacts to ... set end of eAddresses to default email address of theContact ... set AppleScript's text item delimiters to ...
    (microsoft.public.mac.office.entourage)
  • Re: Change the Delimiters
    ... recursive descent parsing to find all the delimiters in most general case. ... The script can be easily modified to do the kind of replacement you want. ... double quotation marks and do the replacement accordingly. ... > search/replace may suffice. ...
    (microsoft.public.sqlserver.clients)
  • Re: Exporting from Calendar to a CSV file
    ... here's a script that will save the data to a tab delimited text file ... set {oldTIDS, AppleScript's text item delimiters} to ¬ ... {AppleScript's text item delimiters, {", "}} ... set eventData to {mysub:subject, myST:start time, myET:end time, ...
    (microsoft.public.mac.office.entourage)