Ayuda con update ... please
Publicado por Zunea (18 intervenciones) el 24/08/2012 05:21:04
Amigos, gracias de antemano;
Estoy tratando de actualizar un registro en la tabla productos y me sale el siguiente error:
update requiere que UpdateCommand sea valido cuando se pasa la coleccion DataRow con las filas modificadas
La verdad soy nuevo en esto y estoy muy enredado.
Gracias por la ayuda o sugerencia al respecto.
Este es el código:
Private Sub ActualizaSaldoProductos()
Dim VarId3 As Integer
VarId3 = DDListProduct.SelectedValue
Try
Dim cnp3 As New SqlConnection
Dim queryp3 As New SqlCommand
Dim resp3 As Integer
cnp3.ConnectionString = SDSProduct.ConnectionString
cnp3.Open()
queryp3.CommandType = Data.CommandType.Text
queryp3.CommandText = "Select * from productos where id ='" & VarId3 & "'"
queryp3.Connection = cnp3
resp3 = queryp3.ExecuteScalar
If queryp3.ExecuteNonQuery() Then
Dim dts As New DataTable
Dim da As New SqlDataAdapter(queryp3)
da.Fill(dts)
dts.Rows(0).Item(11) = NewSaldo
da.Update(dts)
End If
cnp3.Close()
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
Estoy tratando de actualizar un registro en la tabla productos y me sale el siguiente error:
update requiere que UpdateCommand sea valido cuando se pasa la coleccion DataRow con las filas modificadas
La verdad soy nuevo en esto y estoy muy enredado.
Gracias por la ayuda o sugerencia al respecto.
Este es el código:
Private Sub ActualizaSaldoProductos()
Dim VarId3 As Integer
VarId3 = DDListProduct.SelectedValue
Try
Dim cnp3 As New SqlConnection
Dim queryp3 As New SqlCommand
Dim resp3 As Integer
cnp3.ConnectionString = SDSProduct.ConnectionString
cnp3.Open()
queryp3.CommandType = Data.CommandType.Text
queryp3.CommandText = "Select * from productos where id ='" & VarId3 & "'"
queryp3.Connection = cnp3
resp3 = queryp3.ExecuteScalar
If queryp3.ExecuteNonQuery() Then
Dim dts As New DataTable
Dim da As New SqlDataAdapter(queryp3)
da.Fill(dts)
dts.Rows(0).Item(11) = NewSaldo
da.Update(dts)
End If
cnp3.Close()
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
Valora esta pregunta


0