Visual Basic - Complemento de la pregunta de abajo

'Asi hago la coneccion

Dim db As Connection
Set db = New Connection
db.CursorLocation = adUseClient
db.Open "PROVIDER=Microsoft.Jet.OLEDB.3.51;Data Source = C:\Rentas\Rentas.Mdb"


Set adoRentadasRS = New Recordset
adoRentadasRS.Open "SELECT Detalle.Clave, Detalle.Descripcion, Detalle.Rentado, Detalle.FechaDev, Detalle.Devuelto, Detalle.Multa, Maestro.Cliente, Rtrim(Clientes.Apellido1)+' '+Rtrim(Clientes.Apellido2)+' '+Clientes.Nombre As Nom FROM Detalle, Maestro,Clientes WHERE Detalle.Folio = Maestro.Folio AND Maestro.Cliente = Clientes.Clave", db, adOpenStatic, adLockOptimistic

y asi quiero actualizarlo

adoRentadasRS.Fields("Devuelto") = True
adoRentadasRS.MoveNext

gracias

Utiliza adLockBatchOptimistic

Saludos

Gracias parece que ya quedo.

ahora no marca el error, si actualiza el recordeset, pero las bases de datos (detalle, maestro. etc) no las actualiza.

Gracias

Cuando utilizo UpdateBatch me vuelve a salir el error.