<!--#include file="../Include/xbqq_Setup.asp" -->
<%
    dim conn
    dim connstr
    dim db
    db="../"&Gaobeidb_All&""
    Set conn = Server.CreateObject("ADODB.Connection")
    connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
    conn.Open connstr

    function CloseDatabase
	Conn.close
	Set conn = Nothing
    End Function
%>