Conexion A Base

[ccastillo]

cada vez que yo haga una consulta a una tabla tengo que poner esto

Set conn = Server.CreateObject ("ADODB.Connection")
conn.ConnectionTimeout = 15
conn.CommandTimeout = 30
conn.Open "DRIVER=SQL Server;SERVER=nomb_serv;UID=uid;PWD=pass;DATABASE= base_datos"

Set objSS = Server.CreateObject("ADODB.RecordSet")
objSS.ActiveConnection = conn
mquery = "Select notapedenc.codnotaped, Notapedenc.numfactura, Notapedenc.fecha, notapedenc.codcliente "
mquery = mquery + "From Notapedenc where "
mquery = mquery + "notapedenc.fecha >= " & trim(fec_i2) & " and notapedenc.fecha <= " & trim(fec_f2) & " order by notapedenc.fecha "
objSS.Open mquery

recorro la tabla con un bucle


al termino de la lectura coloco esto

<% objSS.Close
Set objSS = Nothing
%>

esta bien asi