Código:
y si tengo n rs entonces hago lo mismo, no se si haya una manera de abrir la conexion una sola vez, esto es porque estoy en profile de sql y veo que se abre y se cierra la conexon n veces. Dim con
Dim rs
Dim rs1
Dim sql
Dim sql1
set con = server.CreateObject("ADODB.Connection")
con.Open "DRIVER=SQL Server;SERVER=Servidor;UID=user;PWD=user;APP=ReqIntegra;WSID=EHP135446;DATABASE=ReqIntegra"
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
Espero haberme explicado
Gracias a todos :)
pero solo para ver si no estoy mal, tengo en el global.asa
