This segment of code gives me the follow error:
'fgrGaran' is FlexiGrid Control and 'rsFianza' is an ADO 2.1 recordset.


Code:
Cn.ConnectionString = "DSN=CapCont21;UID=;PWD=;OLE DB Services=-1;"
Cn.Open
Cn.CursorLocation = adUseClient

With fgrGaran   
   For X = 1 To rsFianza.RecordCount         
      rsFianza.AbsolutePosition = X      
      .Col = 0: rsFianza!concepto = .Text      
      .Col = 1: rsFianza!numfianz = .Text      
      .Col = 2: rsFianza!importe = Val(Format(.Text, "####.##"))      
      .Col = 3: rsFianza!afianzad = .Text      
      .Col = 4: If VBDateVal(.Text) Then rsFianza!ffianza = DateVBToFox(.Text)      
      .Col = 5: If VBDateVal(.Text) Then rsFianza!fini = DateVBToFox(.Text)      
      .Col = 6: If VBDateVal(.Text) Then rsFianza!ffin = DateVBToFox(.Text)      
      rsFianza.Update   
   Next
End With
Run-time error '-2147467259 (800004005)':
Insufficent or incorrect key information; too many row affected by update.

When I used RDO this code works perfectly.

Any idea?

Thanks!

Ulises