Problema de dirreccionamiento?? me tiene complicado

[JuanRAPerez]

como es viernes no se me ocurre mas que esto

cn.asp
en el rais de tu sitio

<%
dim Conn
Sub AbrirConexionPrincipal
strCon = Server.MapPath("database/aspProductCatalog.mdb")
cnProvider = "Provider=Microsoft.JET.OLEDB.4.0;"
cnDataSource = "Data Source=" & strCon
Conn = cnProvider & cnDataSource
end Sub

sub CerrarConexionPrincipal
Conn.Close
set Conn = nothing
end sub


dim ConnLogin
Sub AbrirConexionPrincipalLogin
strCon = Server.MapPath("../database/aspProductCatalog.mdb")
cnProvider = "Provider=Microsoft.JET.OLEDB.4.0;"
cnDataSource = "Data Source=" & strCon
ConnLogin = cnProvider & cnDataSource
end Sub

sub CerrarConexionPrincipalLogin
ConnLogin.Close
set ConnLogin = nothing
end sub
%>

y en la de login

<%
AbrirConexionPrincipalLogin
%>
-aqui el codito
<%
CerrarConexionPrincipalLogin
%>

en tus otras paginas

<%
AbrirConexionPrincipal
%>
-aqui el codigo
<%
CerrarConexionPrincipal
%>