无法通过VBA更新访问文件

Question

我正在尝试使用VBA更新Microsoft访问文件，但出现以下错误。我可以使用相同的密码手动打开访问文件。不知道Microsoft Access中是否存在设置问题。请协助。

编码：

With Acon
    .Provider = "Microsoft.ACE.OLEDB.12.0"
    .ConnectionString = "Data Source=" + Sheet1.Range("V33").Value & filen & ".accdb"
    .Properties("Jet OLEDB:Database Password") = "synpass"
    .Open

出现以下错误

  

-2147217843无效的密码。