Updating Database From Form Error Message

I am getting an error message when trying to up to update a database from a form. It appears a simple looking error but I can't seem to see what the problem is


Any ideas would be appreciated





This is the error message


Line 1: Incorrect syntax near '('.


Description: An unhandled exception occurred during the execution of the current web request. Please review the stack trace for more information about the error and where it originated in the code.





Exception Details: System.Data.SqlClient.SqlException: Line 1: Incorrect syntax near '('.





Source Error:








Line 95: sqlConnection.Open


Line 96: Try


Line 97: rowsAffected = sqlCommand.ExecuteNonQuery


Line 98: Finally


Line 99: sqlConnection.Close








Source File: D:Webspacewebs4cInetpubwwwrootkerslakeAdminUpdate.aspx Line: 97





Stack Trace:








[SqlException: Line 1: Incorrect syntax near '('.]


System.Data.SqlClient.SqlCommand.ExecuteReader(CommandBehavior cmdBehavior, RunBehavior runBehavior, Boolean returnStream) +742


System.Data.SqlClient.SqlCommand.ExecuteNonQuery() +194


ASP.Update_aspx.Update(Int32 lifestyleID, String clientFirstName, String clientSurname, String clientStreet, String clientTown, String clientState, String clientPhone, String clientMOB, String clientEmail, Int32 methodContact, String occupation, String selfEmployed, String company, String address, String other, String progress, DateTime lastUpdate, String dOB, String prefferedTime) in D:Webspacewebs4cInetpubwwwrootkerslakeAdminUpdate.aspx:97


ASP.Update_aspx.Update(Object Source, EventArgs E) in D:Webspacewebs4cInetpubwwwrootkerslakeAdminUpdate.aspx:321


System.Web.UI.WebControls.Button.OnClick(EventArgs e) +108


System.Web.UI.WebControls.Button.System.Web.UI.IPostBackEventHandler.RaisePostBackEvent(String eventArgument) +57


System.Web.UI.Page.RaisePostBackEvent(IPostBackEventHandler sourceControl, String eventArgument) +18


System.Web.UI.Page.RaisePostBackEvent(NameValueCollection postData) +33


System.Web.UI.Page.ProcessRequestMain() +1292





THIS IS THE CODE>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>


Function Update( _


ByVal lifestyleID As Integer, _


ByVal clientFirstName As String, _


ByVal clientSurname As String, _


ByVal clientStreet As String, _


ByVal clientTown As String, _


ByVal clientState As String, _


ByVal clientPhone As String, _


ByVal clientMOB As String, _


ByVal clientEmail As String, _


ByVal methodContact As Integer, _


ByVal occupation As String, _


ByVal selfEmployed As String, _


ByVal company As String, _


ByVal address As String, _


ByVal other As String, _


ByVal progress As String, _


ByVal lastUpdate As Date, _


ByVal dOB As String, _


ByVal prefferedTime As String) As Integer


Dim connectionString As String = "server='202.xxxxxxx; user id='webs4c'; password='xxxxxxx'; database='xxxx'"


Dim sqlConnection As System.Data.SqlClient.SqlConnection = New System.Data.SqlClient.SqlConnection(connectionString)


Dim queryString As String = "UPDATE [Lifestyle] ([LifestyleID], [ClientFirstName], [ClientSurname], [ClientStr"& _


"eet], [ClientTown], [ClientState], [ClientPhone], [ClientMOB], [ClientEmail], [M"& _


"ethodContact], [Occupation], [SelfEmployed], [Company], [Address], ["& _


"Other], [Progress], [LastUpdate], [DOB], [PrefferedTime]) VALUES "& _


"(@UserID, @ClientFirstName, @ClientSurname, @ClientStreet, @ClientTown, @ClientS"& _


"tate, @ClientPhone, @ClientMOB, @ClientEmail, @MethodContact, @Occupation, @Self"& _


"Employed, @Company, @Address, @Other,@Progress, @LastU"& _


"pdate, @DOB, @PrefferedTime WHERE ([Lifestyle].[L"& _


"ifestyleID] = @LifestyleID)"





Dim sqlCommand As System.Data.SqlClient.SqlCommand = New System.Data.SqlClient.SqlCommand(queryString, sqlConnection)





sqlCommand.Parameters.Add("@LifestyleID", System.Data.SqlDbType.Int).Value = lifestyleID


sqlCommand.Parameters.Add("@ClientFirstName", System.Data.SqlDbType.NVarChar).Value = clientFirstName


sqlCommand.Parameters.Add("@ClientSurname", System.Data.SqlDbType.NVarChar).Value = clientSurname


sqlCommand.Parameters.Add("@ClientStreet", System.Data.SqlDbType.NVarChar).Value = clientStreet


sqlCommand.Parameters.Add("@ClientTown", System.Data.SqlDbType.NVarChar).Value = clientTown


sqlCommand.Parameters.Add("@ClientState", System.Data.SqlDbType.NVarChar).Value = clientStreet


sqlCommand.Parameters.Add("@ClientPhone", System.Data.SqlDbType.NVarChar).Value = clientPhone


sqlCommand.Parameters.Add("@ClientMOB", System.Data.SqlDbType.NVarChar).Value = clientMOB


sqlCommand.Parameters.Add("@ClientEmail", System.Data.SqlDbType.NVarChar).Value = clientEmail


sqlCommand.Parameters.Add("@MethodContact", System.Data.SqlDbType.Int).Value = methodContact


sqlCommand.Parameters.Add("@Occupation", System.Data.SqlDbType.NVarChar).Value = occupation


sqlCommand.Parameters.Add("@SelfEmployed", System.Data.SqlDbType.NVarChar).Value = selfEmployed


sqlCommand.Parameters.Add("@Company", System.Data.SqlDbType.NVarChar).Value = company


sqlCommand.Parameters.Add("@Address", System.Data.SqlDbType.NVarChar).Value = address


sqlCommand.Parameters.Add("@Other", System.Data.SqlDbType.NVarChar).Value = other


'sqlCommand.Parameters.Add("@DateEnquiry", System.Data.SqlDbType.DateTime).Value = dateEnquiry


sqlCommand.Parameters.Add("@Progress", System.Data.SqlDbType.NVarChar).Value = progress


sqlCommand.Parameters.Add("@LastUpdate", System.Data.SqlDbType.DateTime).Value = lastUpdate


sqlCommand.Parameters.Add("@DOB", System.Data.SqlDbType.NVarChar).Value = dOB


sqlCommand.Parameters.Add("@PrefferedTime", System.Data.SqlDbType.NVarChar).Value = prefferedTime





Dim rowsAffected As Integer = 0


sqlConnection.Open


Try


rowsAffected = sqlCommand.ExecuteNonQuery


Finally


sqlConnection.Close


End Try





Return rowsAffected


End Function





END CODE