用VB连接ACCESS的问题

[maoxiang123]

我如果把数据库的密码去掉
dbConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\test.mdb"
这样就能连上

如果设置了数据库密码
dbConn.ConnectionString = "dsn=test;Database=test;uid=;pwd=123"
这样也能连上

但是dbConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\test.mdb;uid=;pwd=123"
这样就不行

实时错误'-2147217843 (800040E4D)':

无法启动应用程序。工作组信息文件丢失，或是已被其他用户以独占方式打开

但是我检查了并没有打开数据库文件啊。


我希望用Data Source=" & App.Path & "\test.mdb，而且给数据库加上访问密码。请问应该怎么连?

[阿双2009]

dbConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + App.Path & "\test.mdb" & ";Persist Security Info=False;Jet OLEDB:Database Password=123;"

[jieweibin]

‘我很早以前写的连接代码，连接没问题（最后两句应该可以合起写，楼主自己试一下也行）
Dim db As ADODB.Connection
Set db = New ADODB.Connection
db.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" + "Data Source=" + App.Path + "\test.mdb"
db.Open "Data Source=" + App.Path + "\test.mdb;" + "Jet OLEDB:Database Password=123"

[maoxiang123]

非常感谢楼上两位