2015-05-05 44 views
0

運行MakeTable查詢我有大約20「MakeTable」本地的查詢工作得很好,如果我這樣稱呼它:外部ACCDB

DoCmd.SetWarnings False 
DoCmd.OpenQuery ("qry325_NMC_Final") 
DoCmd.SetWarnings True 

我讓他們移動到另一個ACCDB保持前端乾淨。我不想將表格鏈接起來,以免看到這種混亂,因爲到我完成時它會繼續增長大約6倍。可以將20個MakeTable查詢及其表格放在單獨的accdb中。

如何更新代碼以使其運行相同,但運行來自不同accdb的「MakeTable」查詢?

回答

1

要運行在另一個數據庫的查詢,你可以嘗試這樣的事:

Dim db As DAO.Database 
Set db = DBEngine.Workspaces(0).OpenDatabase("FullPathAndFileNameOfDb") 
db.Execute "qry325_NMC_Final", dbFailOnError 
Set db = Nothing 
+0

如何讓過去的提示/錯誤「tbl325_NMC_Final已經存在?顯然,'doCmd.SetWarning false'在與db.execute一起使用時不起作用 - 或(在外部數據庫中調用查詢?) – monty327

+0

您可能執行'db.Execute「DROP TABLE tbl325_NMC_Final」'在執行之前刪除表查詢? –