Access Runtime 2010操作查询警告

时间:2016-06-14 12:54:38

标签: ms-access ms-access-2010 regedit

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

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

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

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

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

修改

警告信息如下:

  

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

1 个答案:

答案 0 :(得分:4)

  

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

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

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