adoconn.asp

来自「商务网站,信息分类,可以搜索加上ACCESS数据库」· ASP 代码 · 共 10 行

<%
if Session("iswelcome") <> TRUE then
    Response.Write("<script language=""JavaScript"">alert(""\n您未登录或已登录超时！\n\n"");history.go(-1)</script>")
    Response.End
end if

dim objConn
set objConn=server.createobject("adodb.connection")
objConn.open "driver={Microsoft Access Driver (*.mdb)};dbq="&server.mappath("../2008data/data.mdb")
%>