Question

下面是我用vb连接并打开ACCESS数据库的主要代码，但是数据库的密码是123.请问怎么修改才能连接

Dim cnn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim cnnstatestring As String
Dim strMyPath As String
Set cnn = New ADODB.Connection
Set rs = New ADODB.Recordset
strMyPath = App.Path
If Right(strMyPath, 1) <> "\" Then strMyPath = strMyPath & "\"
strMyPath = strMyPath & "test.mdb"
cnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strMyPath & ";Persist Security Info=False;"
cnn.Open
上面的程序改为"provider=Microsoft.Jet.OLEDB.4.0;Data Source="& strMyPath & ";Persist Security Info=False;Password=123"; 运行会出现
实时错误'-2147217843 (80040e4d)
无法启动应用程序。工作组信息文件丢失，或是已被其它用户以独占方式打开。
这是怎么回事呀，请高手指点

Answer 1

给你正确答案：

"Provider = Microsoft.Jet.OLEDB.4.0;Jet Oledb:Database Password=123;Data Source=" & strMyPath

Answer 2

"provider=Microsoft.Jet.OLEDB.4.0;Data Source="& strMyPath & ";Persist Security Info=False;Password=123";

Answer 3

sa密码不对,重设下或者是你已经打开数据库,不能执行该操作