modificar campo
Publicado por Horacio Felipe Burriel (42 intervenciones) el 26/03/2002 15:41:36
Tengo una Ado enlasado a una MDB con un Data Grid.
Yo quiero modificar un solo importe y cuando existen otros importes iguales me los modifica a todos los que sean iguales.
Por ejemplo yo tengo en la tabla varios importes (10.00, 20.35, etc,etc) si yo quiero modificar el de 20.35 y no hay otro importe en la tabla que sea igual me lo modifica bien, pero si hay otro u otros importe/s de 20.35 también me los modifica.
Prové con Ado.Recordset.AbsolutePosición, con Find, con un With y End With, pero siempre me hace lo mismo.
Dim totalreg As Integer
totalreg = Ado.Recordset.RecordCount
If totalreg > 0 Then
Ado.Recordset.Fields("importe") = txtimporte
Ado.Recordset.Update 'AQUI ME DA EL ERROR = Información de
> Columna clave insuficiente o incorrecta, demasiadas
> filas afectadas por las actualizacion.
Else
MsgBox "No existe registro........"
End If
Yo quiero modificar un solo importe y cuando existen otros importes iguales me los modifica a todos los que sean iguales.
Por ejemplo yo tengo en la tabla varios importes (10.00, 20.35, etc,etc) si yo quiero modificar el de 20.35 y no hay otro importe en la tabla que sea igual me lo modifica bien, pero si hay otro u otros importe/s de 20.35 también me los modifica.
Prové con Ado.Recordset.AbsolutePosición, con Find, con un With y End With, pero siempre me hace lo mismo.
Dim totalreg As Integer
totalreg = Ado.Recordset.RecordCount
If totalreg > 0 Then
Ado.Recordset.Fields("importe") = txtimporte
Ado.Recordset.Update 'AQUI ME DA EL ERROR = Información de
> Columna clave insuficiente o incorrecta, demasiadas
> filas afectadas por las actualizacion.
Else
MsgBox "No existe registro........"
End If
Valora esta pregunta
0