连接密码保护的访问文件

我想连接密码保护的访问文件。 与下面的编码,我得到一个错误为“不正确的密码”,但是当我用相同的密码手动打开它,打开。 我是否可以对数据库设置进行任何更改?

Dim Acon As New ADODB.Connection Dim Rs As New ADODB.Recordset With Acon .Provider = "Microsoft.ACE.OLEDB.12.0" .ConnectionString = "Data Source=" + "U:\scratch\OK.accdb" .Properties("Jet OLEDB:Database Password") = "123" .Open End With 

是的,你会得到这个问题。 按照我告诉你的步骤进行sorting

  1. closures你的数据库
  2. 从Access中,单击“ 文件”|“打开” ,然后以Exclusive打开数据库 在这里输入图像说明
  3. 文件菜单解密数据库

    在这里输入图像描述

  4. 单击文件|选项|客户端设置并导航到最后,并select下面显示的选项 在这里输入图像说明

  5. 在上面的屏幕中单击OK后,encryption您的数据库。
  6. closures数据库,然后尝试代码

我用于testing的代码

 Sub Sample() Dim Acon As New ADODB.Connection Dim Rs As New ADODB.Recordset With Acon .Provider = "Microsoft.ACE.OLEDB.12.0" .ConnectionString = "C:\Users\Siddharth\Desktop\Database3.accdb" .Properties("Jet OLEDB:Database Password") = "test" .Open End With End Sub