<%
dim conn_adv,connstr_adv,db_adv
db_adv="./DATA/adv.mdb"
Set conn_adv = Server.CreateObject("ADODB.Connection")
connstr_adv="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db_adv)
conn_adv.Open connstr_adv
%>

