Access Runtime 2010 操作查询警告

Access Runtime 2010 action query warnings

我有一台电脑没有安装MS Access,所以我安装了免费的运行time版本,这样电脑就可以用来做数据库了。

除了一个问题,我已经启动了数据库并且 运行ning。当操作查询是 运行 时,它们前面有一条警告消息。我已尝试更改信任中心设置,但仍然收到警告。

老实说,我真的不想在 VBA 中 docmd.setwarnings = false。我认为如果我的完整版可以正常工作,那么我的 运行time 版本也应该可以。

EDIT

警告信息如下:

"You are about to run an update query that will modify data in your table.Are you sure you want to run this type of action query?"

When action queries are run they are preceded by a warning message. I have tried changing the trust center settings but I still get the warning.

这些操作查询警告和确认与信任中心设置无关。如果您想全面禁止它们,请查看访问选项 -> 客户端设置,然后向下滚动到 "Confirm" 部分。但我不建议你这样做。

按照 Christopher 的建议使用 DAO.Database.Execute 方法。您可以将 CurrentDb 用于 DAO.Database,或将对象变量设置为 CurrentDb 并使用该变量的 .Execute

Dim db As DAO.Database
Set db = CurrentDb
db.Execute "overdue_Query", dbFailOnError

对象变量方法允许您检查 db.RecordsAffected 并获取最后使用的自动编号值* 见下文Debug.Print db.OpenRecordset("SELECT @@Identity")(0)

.Execute 也很灵活,因为它可以接受已保存查询的名称(如上所述)或 SQL 语句。所以你可以做这样的事情......

Dim strDelete As String
strDelete = "DELETE FROM tblFoo;"
db.Execute strDelete, dbFailOnError
MsgBox db.RecordsAffected & " records deleted"

* 从该对象变量执行的最后一个 INSERT 使用的自动编号值。