Proyecto: Foro en ASP

[trasgukabi]

Código:

function abrirrs(sql,cursor1,cursor2)
	set abrirrs=server.CreateObject("ADODB.recordset")
	abrirrs.open sql,conn,cursor1,cursor2
end function

'forma de llamada
sql="select * from......"
set rs=abrirrs(sql,0,1)

function cierrars(rso)
	rso.close
	set rso=nothing
end function
'forma de llamada
cierrarrs(rs)

function cierraconexion()
	conn.close
	set conn=nothing
end function
'forma de llamada
cierraconexion