conexiones...

[vic78]

Hola, estaba viendo tu codigo y veo que ejecutas dos SP, si no necesitas traerte los datos de la BD, y solo efectuas algunas intrucciones dentro del servidor los recordsets salen sobrabdo te explico:
Tu tienes esto:

sql = "spRequerimientos 5,'' "
sql1 = "spUsuarios 3"

set rs = server.CreateObject "ADODB.Recordset")
set rs1 = server.CreateObject "ADODB.Recordset")

rs.Open sql, con
rs1.open sql1, con
'se hace lo que se tiene que hacer
rs.close
set rs = nothing
rs1.close
set rs1 = nothing
con.close
set con = nothing

Lo cual lo podemos reducir a esto

sql = "spRequerimientos 5,'' "
conn.Execute(sql)

'Aqui hace lo que tiene que hacer
sql1 = "spUsuarios 3"
conn.Execute(sql)
'Aqui hace lo que tiene que hacer

Y si necesitas usar Recordset lo puedes hacer asi
Set Rs = Server.Crea.....................

sql = "spRequerimientos 5,'' "
RS.Open Sql, conn
'Hace lo que tiene que hacer
Rs.Close

sql = "spUsuarios 3"
Rs.Open,sql,conn
'Aqui hace lo que tiene que hacer
Y si observas solo utilizas una variable para SQL y otra para el RS, espero me halla explicado

Saludos