<%
strconn = "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" & Server.MapPath("数据库文件")

set　conn = server.createobject("adodb.connection")

conn.open strconn
%>