通过Excel 2010连接到Access数据库时出错

时间:2012-05-07 16:02:13

标签: ms-access excel-vba vba excel

我正在尝试从我的C盘上的访问数据库中检索数据,我收到以下错误:

“无法启动您的应用程序。工作组信息文件丢失或由其他用户独占打开。”

调试器在以下代码中显示错误:

MyConnObj.Open _
    "Provider = Microsoft.Jet.OLEDB.4.0;" & _
    "Data Source=C:\<database>.mdb;" & _
    "User ID=<username>;" & _
    "Password=<pass>;"

如何修复此错误?

我有以下定义:

Dim MyConnObj As New ADODB.Connection 'ADODB Connection Object
Dim myRecSet As New ADODB.Recordset 'Recordset Object
Dim sqlStr As String ' String variable to store sql command

1 个答案:

答案 0 :(得分:1)

不确定,但该错误意味着您需要指定工作组(系统数据库)文件。 尝试将此添加到您的连接

MyConnObj.Open _ 
    "Provider = Microsoft.Jet.OLEDB.4.0;" & _ 
    "Data Source=C:\<database>.mdb;" & _ 
    "Jet OLEDB:System Database=<path to system.mdw with information on username/pass>;" & _
    "User ID=<username>;" & _ 
    "Password=<pass>;" 

另外,如果您的访问mdb未受system.mdw文件保护,您可以尝试删除&#34;用户ID&#34;和#34;密码&#34;来自连接字符串的部分。