Help with addressbook adding an email.

I am tring to add a new email to a contact. I am working off of this
site.
http://www.macosxtips.co.uk/index_files/bulk-edit-address-book-.html

What I am really trying to do is update the contact from another data
source. I am also using rb-appscript. If that helps any. I am trying
to get the apple script down and use the translational tool they
have.

tell application "Address Book"
repeat with i from 1 to (count every person)
set theEmailAddresses to properties of emails of person i
repeat with j from 1 to (count of theEmailAddresses)
if value of item j of theEmailAddresses contains "@googlemail.com"
then
set oldAddress to value of item j of theEmailAddresses
set AppleScript's text item delimiters to {"@"}
set firstBit to first text item of oldAddress
set newAddress to firstBit & " "
--AT THIS POINT I WANT TO ADD A NEW EMAIL ADDRESS NOT CHANGE THE
CURRENT ONE.
end if
end repeat
end repeat
save
end tell

Any help would be amazing! Thanks
Becker

In article
,
Becker wrote:

> What I am really trying to do is update the contact from another data
> source. I am also using rb-appscript. If that helps any. I am trying
> to get the apple script down and use the translational tool they
> have.

make new email at end of emails of person i¬
with properties {label:"whatever", value:newAddress}

Patrick
--
Patrick Stadelmann