Includes en ASP

[Yoston]

Hola
mira lo puedes hacer asi...
creas una pagina asp

***conn.asp*****
<%
sub CrearCon()
Application.Lock()
BD= "PROVIDER=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & Server.MapPath("Tu_BD.mdb;")
set Conexion=server.CreateObject ("ADODB.connection")
Conexion.Open BD
Application.UnLock()
end sub

sub CrearRs()
Application.Lock()
set rs = Server.CreateObject("ADODB.Recordset")
Application.UnLock()
end sub

Sub RSEjecutar(senSQL)
Application.Lock()
rs.Open senSQL, Conexion
Application.UnLock()
End Sub
%>


*****en otra pagina*****
<!--#include file="conn.asp"-->
<%
Dim Conexion, rs, SQL
CrearCon
CrearRs
SQL = "select * from... "
RSEjecutar(SQL)

if rs.eof then
..
else
...
end if

etc...

Espero que te sirva..
;)