La operación no está permitida si el objeto está abierto.

[univercity]

Para Ciberpata,
Creo que tu error esta en esto...

'Abrimos el recordset RS3
RS3.Open sqlstring2, Conn3, 3, 3
rs3.movefirst
'Construimos la ruta y el nombre del fichero que se va a borrar del servidor
'que pertenece a los registros de los minoristas
cadenaorigen1=rs3("imagenoferta")
cadenabuscar1="../../"
cadenacambiar1="c:/obradoiroweb/obradoiroweb/Turofertas/"
rutaimagenaborrar1=replace(cadenaorigen1,cadenabus car1,cadenacambiar1,1,1,1)
response.write "<br>el fichero del minorista a borrar es: " & rutaimagenaborrar1
set FSO=CreateObject("Scripting.FileSystemObject")
set file=fso.GetFile(rutaimagenaborrar1)
file.delete
'Este código borrar los registros de los minoristas que tienen ofertas referidas
do while not rs.eof
response.write "<br>Con la orden: <br> " & sqlstring2 & "<br> se borraran los registros de los minoristas:<br>"

'Abrimos el recordset RS2
RS2.Open sqlstring2, Conn2, 3, 3
rs2.movefirst

Fijate que abres el Record 3 y la consulta sqlstring2 y luego donde te marca el error... CLARO SI ESA CONSULTA YA LA TIENES ABIERTA UN POCO MAS ARRIBA!!!!

Solucion : obvio me imagino que ya te distes cuenta, bueno es solo cambiar ese 2 por un 3, creo que eso es..

Slds.