conn.asp

来自「在线学习系统 v1.0 1.本系统采用学号加密码登录」· ASP 代码 · 共 16 行

<%
startime=timer()
dim conn
dim connstr
set conn=server.CreateObject("adodb.connection")
DBPath = Server.MapPath("gg/data/data.mdb")
conn.open "provider=microsoft.jet.oledb.4.0; data source="&DBpath

function CloseDB

Conn.Close
set Conn=Nothing

End Function
%>