带密码

datapath="../db/" '数据库目录的相对路径
datafile="test.mdb" '数据库的文件名
connstr="driver={Microsoft Access Driver (*.mdb)};Password='test';dbq=" & Server.MapPath(""&datapath&""&datafile&"")
on error resume next
 set conn=server.createobject("adodb.connection")
 conn.open connstr

不带密码

datapath="../db/" '数据库目录的相对路径
datafile="test.mdb" '数据库的文件名
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&datapath&""&datafile&"")
on error resume next
 set conn=server.createobject("adodb.connection")
 conn.open connstr