Código asp:
Ver original
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% function conectar() public Recordset1 Set Recordset1 = Server.CreateObject("ADODB.Recordset") Recordset1.ActiveConnection = "dsn=SIRH;uid=consic;pwd=consic;" end function function desconectar() Recordset1.Close() Set Recordset1 = Nothing end function %>