Question

asp怎样连接带有密码的access数据库？

这是asp程序连接access数据库代码：
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%'Session.CodePage=936%>
<%
dim conn,connstr,time1,time2,mdb
time1=timer
mdb="mdb/vvfghftr$%$###@@W.mdb"
on error resume next
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(mdb)
Set Conn=Server.CreateObject("ADODB.Connection")
conn.Open connstr
If Err Then
err.Clear
Set Conn = Nothing
Response.Write "数据库连接出错，请检查连接字串。"
Response.End
End If
%>

以前没有设置密码，网站测试正常，当我给access数据库设置了密码以后网站显示“数据库连接出错，请检查连接字串。”郁闷啊。。。

我的数据库密码是：123456

期待高手帮我修改下连接代码啊。。。
先谢谢了。。。
最好直接在我的代码上修改。。。我直接复制就行了。。。
新手上路，请多指教哦。。。

Answer 1

Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Database Password=123456;Data Source=" & Server.MapPath("test.mdb")
或者
dim connnews
dim connstrnews
dim DBName
DBname="news.mdb"
connstrnews="DBQ="+server.mappath(dbName)+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set connnews=server.createobject("ADODB.CONNECTION")
connnews.open connstrnews, "uid='admin'，pwd='12345'"
connnews.close
或者
dim str_conn,cn
Set cn = Server.CreateObject("ADODB.Connection")
str_conn="Provider=Microsoft.Jet.OLEDB.4.0;uid=admin;password=123456;Data Source= " & Server.mappath("../dfang/difang.mdb")
cn.Open str_conn
补充: 改这一句就可以了...
connstr="Provider=Microsoft.Jet.OLEDB.4.0;uid=admin;password=123456;Data Source=" & Server.MapPath(mdb)

Answer 2

"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\1.mdb;User ID=admin;Password=;Jet OLEDB:Database Password=123456"

也可以用
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\1.mdb;User ID='admin';Password=;Jet OLEDB:Database Password='123456'"

所以你的是
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(mdb) & ";User ID='admin';Password=;Jet OLEDB:Database Password='123456'"

或
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.path & ".\sjcj.mdb;Persist Security Info=False;Jet OLEDB:Database Password=123456"