Access Runtime 2010操作查询警告

Question

我有一台未安装MS Access的PC，因此我安装了免费的运行时版本，以便PC可用于数据库。

我已经启动了数据库并且运行了一个问题。运行操作查询时，会在其前面显示警告消息。我尝试过更改信任中心设置，但仍然收到警告。

• 有没有办法停止此警告消息并在运行时版本中自动运行查询？

如果我诚实的话，我真的不想在VBA中docmd.setwarnings = false。我认为如果我的完整版本工作正常，那么我的运行时版本也应该。

• 我可以使用regedit中的注册表项吗？

  

修改

警告信息如下：

  

“您即将运行更新查询，该查询将修改您的数据   table。您确定要运行此类操作查询吗？“

Answer 1

  

当运行操作查询时，它们前面会显示警告消息。一世   我曾尝试更改信任中心设置，但我仍然得到了   警告。

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

使用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使用的自动编号值。