08/07/2009, 10:44
|
| | | Fecha de Ingreso: marzo-2009
Mensajes: 44
Antigüedad: 16 años, 1 mes Puntos: 0 | |
 Error en actualizacion de datos
Hola!!!
Tengo un código para actualización de datos y funciona bien cuando es con pocos datos, pero al ingresar mas de 10 filas de datos, da un error que dice: "Error '6148' en tiempo de ejecución, Numero de filas incorrecto "
El código es el siguiente:
Cita: Dim CantidadComprada As Double, i As Integer
For i = 0 To dbgridCompras.ApproxCount - 1
dbgridCompras.Row = i
CantidadComprada = dbgridCompras.Columns(6)
Base.Execute "UPDATE Inventario SET Cantidad=Cantidad +" & CantidadComprada & _
" WHERE Cod_Producto=" & dbgridCompras.Columns(2)
Next i En la fila en rojo es donde marca el error al depurar.
Agradecería mucho su ayuda.
Gracias. |