conn.asp

系统功能说明： 1 本书库系统专为以文字为主的站点设计

<%
dim conn,sqlstr,DBPath

DBPath = Server.MapPath("data/book.mdb")

Connstr = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="& DBPath
Set conn = Server.CreateObject("ADODB.Connection")
Conn.open Connstr
%>