急，求教压缩数据库方法

yan007007 · 发表于 2013-5-7 11:31

在2003里 CommandBars("menu bar").Controls("工具(&T)").Controls("数据库实用工具(&D)").Controls("压缩和修复数据库(&C)...").accDoDefaultAction
这样写的。。。。在07里不能用了。。。。老师们。。。帮帮忙。。。07怎么压缩啊。。。

yan007007 · 发表于 2013-5-7 11:34

我要压缩的是当前数据库。。。。。。要写到VBA里。。。。

yan007007 · 发表于 2013-5-7 11:35

要执行代码时候，自动执行压缩动作，要不文件超过2G限制了。。。厄。。。

竹笛 · 发表于 2013-5-7 13:23

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

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

		自动登录	找回密码
密码			免费注册