conn.asp

来自「自由领域ASP+WAP同学录(V1.0)系统是一套仿ChinaRen的即可用电脑」· ASP 代码 · 共 11 行

<%
   dim conn   
   dim connstr
If  session("adminname")=""  Then
  Response.write "<script>top.location.href='../login.htm';</script>"
  Response.End
End if
   connstr="DBQ="+server.mappath("../../data/manage.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
     set conn=server.createobject("ADODB.CONNECTION")
     conn.open connstr 
%>