如何从Excel中的VBA连接到MS-Access数据库？

Question

我正在尝试使用VBA代码从Excel连接到ms-access数据库，但收到错误消息“无效密码”。 我有Office 365订阅。

我尝试了仅包含数字，仅包含单词的密码，并在其中加上“;” 密码末尾的字符。

Set cn = CreateObject("ADODB.Connection")
conexion = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\myFolder\myAccessFile.accdb; Jet OLEDB:Database Password=MyDbPassword"
cn.Open conexion

Answer 1

从Connectionstrings.com ：

微软ACE OLEDB 12.0

标准安全

Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\\myFolder\\myAccessFile.accdb; Persist Security Info=False;

带数据库密码

这是使用Access中的“设置数据库密码”功能通过密码保护Access 2007-2013数据库时要使用的连接字符串。

Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\\myFolder\\myAccessFile.accdb; Jet OLEDB:Database Password=MyDbPassword;

某些有关密码长度超过14个字符的问题的报告。 还有一些字符可能会引起麻烦。 如果遇到问题，请尝试将密码更改为短密码，并使用正常字符。

注意！ 报告说，使用Access 2010-2013默认加密方案加密的数据库不适用于此连接字符串。 在访问中； 请尝试选择并选择2007加密方法。 那应该使它工作。 我们不知道任何其他解决方案。 如果有其他解决方案，请联系！

---

根据他们的建议，尝试将密码更改为短于14个字符的密码。

另外，在您的示例中，您确实省略了分号; 在您的密码之后。

Answer 2

解决了。 我引用此解决方案发布在这里 ：

“（...）首先，删除密码，然后进入“访问”->“文件”->“选项”->“客户端设置”->“高级”，并选中“使用旧版加密”。现在我们可以重新创建密码，并给它一个密码。尝试。”

请记住，此选项比“使用预定的加密”安全性低