conn.asp

来自「校园二手交易系统,具有完备的后台操作以及应用功能!」· ASP 代码 · 共 14 行

<%
connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("../date1/date.mdb")
set conn= Server.CreateObject("ADODB.Connection")
on Error Resume Next
conn.Open connstr
If Err then
err.clear
set conn=nothing
response.write "数据库连接出错，请检查连接。"
response.end
end if
%>