conn.asp

功能强大的一个b/s工作站

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

function CloseDB

Conn.Close
set Conn=Nothing

End Function

const ProgramCName=".::kite.wx-e.com::."
const ProgramEName="kite&wind."
const ProgramVer="020201"
%>