Help updating Vendor Email Via Script

Hello, 

I am trying to update the vendor email address with a concatenation of some UDF email addresses that we have. I have used this same code to update UDFs, but I guess this is the incorrect syntax to update non-UDFs, but I can't figure out how to do it. Here is my code (I only have one email address, no concatenation now for testing purposes):

email1 = ""
email2 = ""
email3 = ""
email4 = ""
email5 = ""

retVal = oBusObj.GetValue("EmailAddress$",email1)
retVal = oBusObj.GetValue("UDF_EMAIL_2$",email2)
retVal = oBusObj.GetValue("UDF_EMAIL_3$",email3)
retVal = oBusObj.GetValue("UDF_EMAIL_4$",email4)
retVal = oBusObj.GetValue("UDF_EMAIL_5$",email5)


retVal = oBusObj.SetValue("EmailAddress$", email2)