Update a bd sql server 2000 desde flexgrid
Buenos días.. Tengo este código donde recorro un flexgrid y la primera columna es la que me interesa en este caso.. El ciclo lo hace bien.. Me trae todos los datos.. Pero no actualiza la base de datos, me podrían ayudar por favor!
cnN.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=INVENTATELAS;Data Source=og-dev"
cnN.Open
With GRIDINVENTA
For J = 1 To GRIDINVENTA.Rows - 2
For E = 1 To GRIDINVENTA.Cols - 9
CAMBIA = (GRIDINVENTA.TextMatrix(J, E))
cnN.Execute "UPDATE inventablauer SET anaquel='" & txtanaquel.Text & "' WHERE IDOGA =' " & CAMBIA & " '"
Next E
Next J
End With
cnN.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=INVENTATELAS;Data Source=og-dev"
cnN.Open
With GRIDINVENTA
For J = 1 To GRIDINVENTA.Rows - 2
For E = 1 To GRIDINVENTA.Cols - 9
CAMBIA = (GRIDINVENTA.TextMatrix(J, E))
cnN.Execute "UPDATE inventablauer SET anaquel='" & txtanaquel.Text & "' WHERE IDOGA =' " & CAMBIA & " '"
Next E
Next J
End With
1 respuesta
Respuesta de drinfierno