Issue using SQL string to do UPDATE

When I run the attached code I get the following error:

Microsoft OLE DB Provider for SQL Server error '80040e14'

Incorrect syntax near '('.

When I output newSQL I get:
UPDATE xxXXX set (userName,FirstName,LastName,password,emailAddress) Values('PhilG','Phil','Gxxxxxxon','12345','philg@abc.com') WHERE AdminID = '5'

dim uname, fname, lname, password, emailAdd
	  uname = Request.Form("uname")
	  fname = Request.Form("fname")
	  lname = Request.Form("lname")
	  email = Request.Form("emailAdd")
	  password = Request.Form("password")

  
	Dim newSQL
	  newSQL = "UPDATE xxXXX set (userName,FirstName,LastName,password,emailAddress) Values('" & uname & "','"  & fname &  "','"  & lname &  "','"  & password & "','"  & email &  "') WHERE AdminID = '" & getUserID & "'"
  
 'Response.Write(newSQL)
  
	Set objRSupdate = Server.CreateObject("ADODB.Recordset")
	  objRSupdate.Open newSQL, objConn
	
	Response.Write("User has been added Updated.")

Select allOpen in new window