dbconn.inc

来自「该资料包含大量网络开发的案例和源代码」· INC 代码 · 共 12 行

<%
	dim objConn,objRS,strConn,strSql
	set objConn=server.CreateObject("adodb.connection")
	set objRS=server.CreateObject("ADODB.Recordset")
	strconn="Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.mappath("../data/#user.mdb")
	objConn.open strConn
%>
 <%  
     'Response.Buffer = True 
     '开始错误处理
     'On Error Resume Next
  %>