Visual Basic - urgente delete con visual,acces

hola...gracias por ver mi duda.
es lo siguiente
tengo un procedimiento que elimina un registro o varios dependiendo dela condicion

en un modulo esta algo mas o menos asi

bueno...
los procedimientos son
abrirconnexion--- abre la conexion
consultarrs-- abre el rs y ejecuta una consulta
cerrarrsconn---cierra ambos

bueno en el procedimiento tengo algo que hace esto

buscamos el valor para eliminarlo de acuerdo a un criterio
abrirconn(path)
consultarrs("delete from tabla where condicion")
--hasta aqui todo bien, no manda ningun error, elimina los registros , etc
pero cuando llamo al procedimiento que cierra el rs y la conexion
me manda un error que dice:

"la operacion no puede ejecutarse si el objeto esta cerrado"

y sucede que nunca cierro el rs hasta despues de ejecutar la eliminacion el registro, algo asi

procedimiento "eliminarreg"
luego "cerrarrsconn"

y es todo no entiendo porque me manda este error si alguein sabe por favor digamelo, o si puede mandeme la contestacion a mi correo..

muchas gracias y que tengan un buen dia.

Lo que no entiendo es porque necesitas un recordset si estas ejecutando una consulta de accion (DELETE). Un recordset solo lo usas cuando ejecutas una consulta de seleccion, es decir, un SELECT.

Lo otro que te puedo decir es que puedes colocar algo como

If rs.State = adStateOpen Then
rs.Close
End If

Aqui preguntas si el recordset esta abierto y si es asi lo cierras...