执行"压缩和修复数据库"的代码

huangqinyong · 发表于 2008-7-4 11:29

CommandBars("menu bar").Controls("工具(&T)").Controls("数据库实用工具(&D)").Controls("压缩和修复数据库(&C)...").accDoDefaultAction
如果是英文的就把菜单名称改成英文的就行了

jilijun · 发表于 2008-7-7 19:14

请教LZ：

access自带的修复压缩数据库工具用的是：

DAO (Data Access Object ) 还是 Microsoft Jet and Replication Objects Library

请指教！！谢谢！

huangqinyong · 发表于 2008-7-8 01:54

这个重要么？

xsxyj005 · 发表于 2008-9-15 22:00

QUOTE:

以下是引用huangqinyong在2008-7-4 11:29:26的发言：
CommandBars("menu bar").Controls("工具(&T)").Controls("数据库实用工具(&D)").Controls("压缩和修复数据库(&C)...").accDoDefaultAction
如果是英文的就把菜单名称改成英文的就行了

请教一下，这些代码是放在Excel中执行的？还是要放在Access中的？还有就是，可不可以自动压缩默认路径下指定的数据库（即不用手动选择路径）？

huangqinyong · 发表于 2008-9-16 00:36

放在Access中,可以的．

zez · 发表于 2008-9-16 09:04

学习了

mxg825 · 发表于 2008-9-18 15:36

楼主:

请问一下!

我想在EXCEL中通过代码对ACC数据库( ST.mdb )

进行压缩和修复数据库,代码如何写?

GUANCHZH · 发表于 2012-3-29 12:29

关注7楼的答案,有谁能解答?

财务小不点 · 发表于 2012-3-30 11:15

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

代码如下:

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

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

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