Unable To Update SQL Table From A Web Form

I have a Table which stores data from two different databases. To update it I made a Web Form that opens a single record where you can edit the data (using TextBox). Then there is an Update Button, which is supoused to Update that record in the SQL Database. However, for some reason it does not work. I get no error and every thing seems to work fine, but the data is not updated. When running the same UPDATE statment in the SQL Query Analyzer everything works just fine. Here is the code for the button click (For test purpose I've set a spesific record to update the Task cell to "Test" and I've adde a DataGrid to be able to see if something is happening):

Private Sub btnUpdate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnUpdate.Click

Dim objConnection As SqlConnection

Dim objDataAdapter As SqlDataAdapter

Dim objDataSet As DataSet

Dim objDataView As DataView

Dim strConnect As String

Dim strSQL As String

Dim strUpdate As String

strConnect = "Persist Security Info=False;Integrated Security=SSPI;server=SRV01;database=DB1"

strSQL = "SELECT * FROM Users WHERE UserID ='" & Request.QueryString("UserID") & "'"

strUpdate = "UPDATE Users SET Task = 'Test' WHERE UserID = 36"     '" & Request.QueryString("UserID") & "'"

objConnection = New SqlConnection(strConnect)

objDataAdapter = New SqlDataAdapter(strSQL, objConnection)

objDataAdapter.UpdateCommand = New SqlCommand(strUpdate)

objDataSet = New DataSet

objDataAdapter.Fill(objDataSet, "User")

objDataView = New DataView(objDataSet.Tables("User"))

dgrTest.DataSource = objDataView

dgrTest.DataBind()

objDataAdapter.ContinueUpdateOnError = True

Try

objDataAdapter.Update(objDataSet, "User")

lblTest.Text = objDataAdapter.UpdateCommand.CommandText

Catch ex As Exception

lblTest.Text = "Error"

End Try

End Sub

 

Thank you for your much needed help in advance.