Script to extract names and email addresses of all recipients of an email

Question

Hi,
I have found some scripts which extract email addresses from the content of messages in Mail, but I am looking for something rather different, and wonder if such a script exists, or if someone can help me build one.  I would like to create a tab delimited text file of the first name, last name and email address of all recipients of a given message in Mail.  Most email addresses will be in the format John Doe <[email protected]>.
Thanks,
Nick

Answer 1

Hi,
nick_harambee wrote:
I have one outstanding issue, which wasn't included in the original question.  Sometimes email addresses are included in the Name of the recipient, i.e. instead of 'John Doe', it reads 'John Doe ([email protected])'.  Could you script be adapted to delete any block of text (i.e. space delimited) that includes the @ symbol, so that 'John Doe ([email protected])' would return:
John<tab>Doe<tab>[email protected]
Use this handler:
on splitName(t)
    if "@" is in t then -- to remove the address after the name
        set n to -3
    else
        set n to -2 -- normal name
    end if
    set tid to text item delimiters
    set text item delimiters to space
    set l to text items of t
    if (count l) = 1 then -- no space 
        set r to tab & t & tab -- last name only 
    else
        tell l to set r to "" & (items 1 thru n) & tab & (item (n + 1)) & tab
    end if
    set text item delimiters to tid
    return r
end splitName