AYUDA!! TENGO UN PROBLEMA AL CAMBIAR UN DATO DE UN CAMPO DE MI B.D
Tengo un proble al querer borrar un dato de de un campo de mi tabla Arriendos de mi base de datos....lo que epasa es que lo borro y solo me permite borrar el primero y si quiero seguir borrando me arroja un error....y le puse un controlador de error y lo maneja pero me cambia todo no solo el campo que quiero cambir (de Deudor a OKAY!) sino cambia toda la columna, este es el codigo:
Private Sub cmdActualizar_Click()
conecActualizaEstadoCli
If MsgBox("¿Realmente desea actualizar este registro?", vbQuestion + vbYesNo) = vbYes Then
rsActualizaEstado!EstadoCliente = "OKAY!"
On Error GoTo corrige:
rsActualizaEstado.Update
Else
rsActualizaEstado.CancelUpdate
End If
Exit Sub
corrige:
MsgBox ("Actualizacion satisfactria"), vbExclamation
Unload Me
End Sub
Si alguien me puede hechar una ayuda le estare muy agradecodo!!!
Private Sub cmdActualizar_Click()
conecActualizaEstadoCli
If MsgBox("¿Realmente desea actualizar este registro?", vbQuestion + vbYesNo) = vbYes Then
rsActualizaEstado!EstadoCliente = "OKAY!"
On Error GoTo corrige:
rsActualizaEstado.Update
Else
rsActualizaEstado.CancelUpdate
End If
Exit Sub
corrige:
MsgBox ("Actualizacion satisfactria"), vbExclamation
Unload Me
End Sub
Si alguien me puede hechar una ayuda le estare muy agradecodo!!!
