conn.asp

来自「在线招生报名系统 2009 (内附说明)」· ASP 代码 · 共 11 行

<% 
dim db,conn,connstr
db="bm.mdb"
set Conn = server.CreateObject("ADODB.Connection")
connstr="provider=microsoft.jet.oledb.4.0;data source="& server.MapPath("db/"&db&"")
conn.Open connstr
sub CloseConn()
	conn.close
	set conn=nothing
end sub
%>