訪問運行時2010動作查詢警告

Question

我有一臺沒有安裝MS Access的PC，因此我已經安裝了免費的運行版本，以便PC可以用於數據庫。

我已經得到了數據庫和運行分開的一個問題。當動作查詢運行時，它們前面有一條警告消息。我嘗試更改信任中心設置，但我仍然收到警告。

• 有沒有辦法阻止此警告消息並在運行時版本中自動運行查詢？

我真的不想要docmd.setwarnings = false在VBA，如果我誠實。我認爲如果我的完整版能夠正常工作，那麼我的運行時版本也應該如此。

• 有沒有什麼我可以用regedit中的註冊表項來做？

編輯

警告消息如下：

「您運行更新查詢，將在您的 修改數據table.Are你確定想要運行這種類型的動作查詢？「

Answer 1

當動作查詢運行時，它們前面有一條警告消息。我 已嘗試更改信任中心設置，但我仍然收到 警告。

這些操作查詢警告和確認與信任中心設置無關。如果您想全面禁用它們，請查看訪問選項 - >客戶端設置，然後向下滾動到「確認」部分。但我不會建議你這樣做。

按照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使用的自動編號值。