Error en tiempo de ejecución

[zabait]

No estoy muy seguro, pero creo que deberías volver a definir el recordset que utilizas, ya que contiene datos que se han borrado en la instrucción SQL que ejecutas, con lo que el recordset intenta acceder a unos datos que ya stán borrados.

sql = "DELETE * FROM gentio WHERE cedula like '" & cedula & "'"
conexion.Execute (sql)
blanquear
datos.MoveFirst

Por tanto, si el recordset está relacionado con la conexion, antes de hacer el movefirst, deberías refrescarlo

sql = "DELETE * FROM gentio WHERE cedula like '" & cedula & "'"
conexion.Execute (sql)
blanquear
datos.refresh
datos.MoveFirst

Prueba esto y ya me diras si es así.

gurgur