I have the following code which isn't updating. Does anyone see an error in it?
Dim dbconn1 As SqlConnection = New SqlConnection("code here"
strInsert = "update goals Set goal1=@goal1, goal2=@goal2, goal3=@goal3, goal4=@goal4, goal5=@goal5, goal6=@goal6, goal7=@goal7, goal8=@goal8, goal9=@goal9, goal10=@goal10 where loginID ='" & loggin.Text & "' And year='" & theyears.Text & "'"
cmdInsert = New SqlCommand(strInsert, dbconn1)
cmdInsert.Parameters.Add("@goal1", goal1.Text)
cmdInsert.Parameters.Add("@goal2", goal2.Text)
cmdInsert.Parameters.Add("@goal3", goal3.Text)
cmdInsert.Parameters.Add("@goal4", goal4.Text)
cmdInsert.Parameters.Add("@goal5", goal5.Text)
cmdInsert.Parameters.Add("@goal6", goal6.Text)
cmdInsert.Parameters.Add("@goal7", goal7.Text)
cmdInsert.Parameters.Add("@goal8", goal8.Text)
cmdInsert.Parameters.Add("@goal9", goal9.Text)
cmdInsert.Parameters.Add("@goal10", goal10.Text)
dbconn1.Open()
cmdInsert.ExecuteNonQuery()
dbconn1.Close()
Dim dbconn1 As SqlConnection = New SqlConnection("code here"
strInsert = "update goals Set goal1=@goal1, goal2=@goal2, goal3=@goal3, goal4=@goal4, goal5=@goal5, goal6=@goal6, goal7=@goal7, goal8=@goal8, goal9=@goal9, goal10=@goal10 where loginID ='" & loggin.Text & "' And year='" & theyears.Text & "'"
cmdInsert = New SqlCommand(strInsert, dbconn1)
cmdInsert.Parameters.Add("@goal1", goal1.Text)
cmdInsert.Parameters.Add("@goal2", goal2.Text)
cmdInsert.Parameters.Add("@goal3", goal3.Text)
cmdInsert.Parameters.Add("@goal4", goal4.Text)
cmdInsert.Parameters.Add("@goal5", goal5.Text)
cmdInsert.Parameters.Add("@goal6", goal6.Text)
cmdInsert.Parameters.Add("@goal7", goal7.Text)
cmdInsert.Parameters.Add("@goal8", goal8.Text)
cmdInsert.Parameters.Add("@goal9", goal9.Text)
cmdInsert.Parameters.Add("@goal10", goal10.Text)
dbconn1.Open()
cmdInsert.ExecuteNonQuery()
dbconn1.Close()