conn.asp

来自「很好的网上书店源码 适合企业个人使用 很好的网络书城」· ASP 代码 · 共 14 行

<%
'----------------------------------
dim startime,conn,connstr,db
'on error resume next
startime=timer()
'----------------------------------在下面这一行修改数据库地址或者名称
db="../Database/Database.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
conn.Open connstr
'----------------------------------
%>