15/06/2011, 02:56
|
| | | Fecha de Ingreso: julio-2010
Mensajes: 18
Antigüedad: 14 años, 8 meses Puntos: 0 | |
| Update a tabla en access 2000
Saludos a tod@s
Veréis, necesito ayuda con un problema que me lleva de cabeza. Estoy intentando que una tabla de la base de datos Access se me actualice desde VB6.
He mirado en cientos de páginas y me he quedado en que cuando voy a iniciar la aplicación me sale un mensaje que dice "Información de columna clave insuficiente o incorrecta; demasiadas filas afectadas por la actualización"
Os dejo el código que tengo escrito por si os sirve de ayuda. Lo que pretendo es que el valor "columna" de la BDD aumente en uno.
Gracias adelantadas!
Set rsActualizacion = New Recordset
sqlActualizacion = "select columna FROM VO WHERE PlanningNum = 30"
rsActualizacion.CursorLocation = adUseClient
rsActualizacion.Open sqlActualizacion, db, adOpenDynamic, adLockOptimistic, adCmdText
Do While Not rsActualizacion.EOF()
valorColumnas = rsActualizacion.Fields("columna").Value
valorColumnas = valorColumnas + 1
rsActualizacion("columna") = valorColumnas
rsActualizacion.Update
rsActualizacion.MoveNext
Loop
Loop |