Question

connstr="DBQ="+server.mappath(db)+";DefaultDir=;driver={Microsoft Access Driver (*.mdb)};"

Answer 1

建立与ACCESS数据库的链接的另外一种方法（绝对可行）：
conn.asp
<%
dim conn,connstr
connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("data/data.mdb")
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
%>

其中"data/data.mdb"为你数据库文件的相对路径。把打开数据库的代码也给出吧：
dim rs,sql
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from 数据库中表名 order by id DESC"

rs.open sql,conn,1,1 //以只读属性打开数据库
rs.open sql,conn,1,3 //以读写属性打开数据库

text=rs("字段名") //读取数据
rs("字段名")=text //写入数据

好了，就这么多了，赶紧试一下吧！

Answer 2

建立与ACCESS数据库的链接.
LZ可以参考以下完整代码
DbName="XXXX.mdb" //数据库名字变量
Set Conn=Server.CreateObject("ADODB.CONNECTION") //建立数据库连接对象
ConnStr="DBQ="+Server.Mappath(DbName)+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};" //连接字符串，包括数据库地址和加载相关驱动
Conn.Open ConnStr //打开所要连接的数据库