简化MS Access中的数据加载

时间:2012-01-09 15:14:12

标签: ms-access ms-access-2003

我有一个用于报告的Access数据库。在我初始加载原始数据之后,我必须运行一些create-queries来创建一些缓存表(以使表单运行得更快),然后在某些辅助表上运行一些更新。如果需要,我运行一个宏,创建几十个这些查找表。

我遇到的问题是执行这些语句总是会产生一个对话框,要求我确认运行create-query会删除旧表,警告我没有足够的磁盘空间/内存来撤消(我认为这是一个内部访问问题,我的工作站有很多物理资源),问我是否真的想要将1485672行放入一个新表...并且它为每个查询执行此操作。有没有办法为所有这些语句设置一个默认答案,这样我就可以执行主宏并走开半个小时,而不是在对话框流中进行蹲坐和坐下来?理想情况下,我希望在控制台窗口或日志文件中看到输出,但我不知道是否可以轻松完成。

某些create-table查询直接从宏执行,但有些具有更多逻辑并在代码(DoCmd.RunSQL "...")中执行。我对这两种类型的查询都有这个问题。更新语句的相同问题(作为更新查询,也作为代码中的SQL执行),以及删除。

2 个答案:

答案 0 :(得分:2)

执行:

Dim db As Database

Set db = CurrentDB

db.Execute "Select blah into new_table from big_table", dbFailOnError

你不会得到(大多数?)警告。

作为奖励,您可以查看受影响的记录。

答案 1 :(得分:0)

您可以使用此处记录的SetWarnings宏操作: MSDN