<% db="../"&db set conn=Server.CreateObject("ADODB.Connection") connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&server.mappath(db) conn.open connstr Sub closedb conn.close Set conn = nothing End Sub %>