退出时压缩数据库的代码应怎样写？

一过客　发表于：2012-03-24 22:11:46 　

退出时对数据库进行压缩的代码应怎样写？

小新发表于：2012-03-24 22:33:18

CommandBars("menu bar").Controls("工具(&T)").Controls("数据库实用工具(&D)").Controls("压缩和修复数据库(&C)...").accDoDefaultAction

一过客发表于：2012-03-25 08:41:46

在窗体的关闭事件中输入这个代码退出时压缩，

压缩后又自动打开，请教：能不能做到压缩后直接退出数据库？

谢谢！！

nowtoo 发表于：2012-03-25 11:33:32

不用代码：工具-选项-常规-关闭时压缩前打钩

小新发表于：2012-03-25 14:49:16

那可以通过 SetOption 方法设置“选项”对话框中选项的当前值来实现

代码如下:

SetOption "Auto Compact", True '退出时自动压缩(相当于工具-选项-常规-关闭时压缩前打钩)

SetOption "Auto Compact", False '退出时不压缩(相当于工具-选项-常规-关闭时压缩前取消打钩)

总记录：4篇页次：1/1 9 1 :

Access交流中心