在没有安全警告消息的情况下打开Access文件

Question

我正在创建一个脚本，使用Access数据库中的宏打印报告，我试图让它在每个星期一自动生成。但是，当我的脚本打开文件时，会出现安全警告，我需要单击“打开”继续。

  

如果此文件包含旨在损害您计算机的代码，则该文件可能不安全。要打开此文件还是取消操作？

打开数据库或更改脚本的安全选项时，有没有办法绕过此安全消息？

以下是代码：

Dim accessApp
Set accessApp = CreateObject("Access.Application")
accessApp.Visible = False
accessApp.OpenCurrentDataBase "C:\db1.mdb"

accessApp.Run "MyMacro"
accessApp.Quit

Set accessApp = Nothing

WScript.Quit