Visual Basic - cerrar el recordset

Hola:
Tengo un problema al cerrar el recordset, solo me da error cuando uso el recordset en consulta de inserción o actualizacion, con las de seleccion no hay ningun problema.

Set rs = New ADODB.Recordset


sSql = "Insert into Prestamos(CodEjemplar,DniLector,FPrestamo,FEntrega) values('" & Num_ejem & "')


Set rs = Conexion.Execute(sSql) 'consulta de insrrcion en prestamos

sSql = "Update Ejemplares set Disponible= False where CodE

Set rs = Conexion.Execute(sSql)
Next

'rs.Close
'Set rs = Nothing

aqui es donde esta el problema, si sabe pq me da error al cerrarlo por favor dimelo.

Gracias.

Hola...
Tu problema es que estás interpretando que los Inserts y los Updates te van a retornar una tupla de datos, y no es así.

Los recordsets tienen que ser básicamente consultas, incluso para actualizar o insertar datos que esos son los recordsets del tipo Lectura-Escritura.

Por eso cuando utilices las instrucciones de INSERT y UPDATE, trata de no enviarlas a un RST.