Entourage script to make a new contact and set as me

i need a script to make a new entourage contact and set it up as the This is me contact. This is going to be added to the script that i have to make a new entourage exchange account. I am having problems setting the contact type as me. any suggestions?

tell window 1 of application "Microsoft Entourage"
	set addr to "mac_user@company.com"
	set lName to "User"
	set fName to "Mac"
	make new contact at address book with properties {email address:addr, last name:lName, first name:fName}
	set contact to me
end tell

I get a syntax error can’t set contact to me. Access not allowed.