Hey, disculpas por mi intromición (mas que nada porque no he leído el tema completo).. pero hay algo que me llama la atención:
Cita: La operación no está permitida si el objeto está abiertors."rs.Open sql1, conexion, 3, 3"
Código:
for i=0 to UBound(vector)
'...
rs.Open sql1, conexion, 3, 3
'...
rs1.Open sql11, conexion, 3, 3
'...
Next
rs y rs1 se abre por cada iteración del vector... eso ¿se puede?
Pa'mi que antes del next tendrías que colocar:
Código:
for i=0 to UBound(vector)
'...
rs.Open sql1, conexion, 3, 3
'...
rs1.Open sql11, conexion, 3, 3
'...
rs.Close
set rs = nothing
rs1.Close
set rs1 = nothing
Next