conn.asp

来自「经典的树型列表,是所有WEB应用开发的必需常用的管理控件」· ASP 代码 · 共 14 行

<%
	dim conn
	dim connstr
	dim db
	db="data/qq.mdb"
	Set conn = Server.CreateObject("ADODB.Connection")
	connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
	conn.Open connstr
	
	sub closedatabase()
	  conn.close
        set conn=Nothing
    End sub
%>