www.gusucode.com > 幻雪企业网站源码 1.0源码程序 > conn.asp

    <%
Set conn = Server.CreateObject("ADODB.Connection")
	connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("hxqn.asp" )
	conn.Open connstr
	
function CloseDatabase

	Conn.close
	Set conn = Nothing

End Function
%>