Shifts of Address field data

Question

Somewhere along the line in Synching .mac information all of my Address program file's ZIP Codes were duplicated and written into the State box, the State data was moved to the City field, and the City data was moved into the Street field preceeded by a carriage return. Is there any way to fix all this short of 750 x 4 "Copy" and "Paste" maneuvers?
G4   Mac OS X (10.4.3)  

Answer 1

THIS SCRIPT HAS NOT BEEN TESTED. Make a backup of your AB data before trying it. It may fix your problem. It assumes that the bad data is in the first address for each person card, and that all person cards need adjusting.
click here to open this script in your editor<pre style="font-family: 'Monaco', 'Courier New', Courier, monospace; overflow:auto; color: #222; background: #DDD; padding: 0.2em; font-size: 10px; width:400px">tell application "Address Book"
set OldDelim to AppleScript's text item delimiters
set AppleScript's text item delimiters to {return}
set MyContacts to every person
repeat with ThisContact in MyContacts
try
set TheAddress to address 1 of ThisContact
set temp to formatted address of TheAddress --force error if there  is no data
set OldCity to city of TheAddress
set OldState to state of TheAddress
set OldStreet to street of TheAddress
set state of TheAddress to OldCity
set street of TheAddress to text item 1 of OldStreet
set city of TheAddress to text item 1 of OldStreet
end try
end repeat
set AppleScript's text item delimiters to OldDelim
end tell</pre>
Feel free to ask before, during or after ...
AK