connm.asp

来自「该系统可对信息系统尽行有效的分类管理」· ASP 代码 · 共 10 行

<%
if session("txtId")="" then
    Response.Write("<script language=""JavaScript"">alert(""\n会员页面，请登录后使用！\n\n"");history.go(-1)</script>")
	Response.Write("错误原因！<br>1：您已离开太久，请重新登录<br>1：您还没有注册，<a href=default.asp>请注册后登录</a>")
    Response.End
end if
dim objConn
set objConn=server.createobject("adodb.connection")
objConn.open "driver={Microsoft Access Driver (*.mdb)};dbq="&server.mappath("../data5.mdb")
%>