繁體中文当前位置: 首页 > 图文教程 > 数据库 > Access > 如何在ACCESS中压缩当前数据库
- Access
- 中文Access2000速成教程--1.2 使用“数据库向导”创建表
- 建立自由的会计日期的报表--1.2.创建让用户选择日期窗体
- 建立自由的会计日期的报表--1.1.认识几个有关时间的函数
- 建立自由的会计日期的报表
- 使用准则进行条件查询--1.5.常用的准则表达式
- 使用准则进行条件查询--1.4.从窗体中选择查询的条件
- 中文Access2000速成教程--1.1 使用“向导”设计数据库
- 获取ACCESS2000数据库中所有表的名称
- 中文Access2000速成教程--1.3 在“设计”视图中设计表
- 中文Access2000速成教程--1.4 使用“表向导”建立新表
- 中文Access2000速成教程--1.8 定义表之间的关系
- 中文Access2000速成教程--1.5 使用已有的数据自动建新表
- 中文Access2000速成教程--1.6 定义“主键”
- 中文Access2000速成教程--1.7 创建索引
- 解决Access中分组报表的问题
- 用 INNER JOIN语法联接多个表建记录集
- ACCESS学习日记
- Access保留字&变量名列表
- 如何 在Access中选择指定日期前的记录？
- ACCESS中关于SQL语句的转义字符
Access 中的 如何在ACCESS中压缩当前数据库
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-10-17 浏览: 48 ::
收藏到网摘: n/a
ACCESS只能压缩已关闭的ACCESS数据库，因此，不能在代码中直接对当前的数据库进行。但可以调用ACCESS菜单的方法解决这个问题。accDoDefaultAction是一个Office Object Library没有公布的调用菜单的方法，下面就是解决这个问题的例程：
'对于简体中文版OFFICE：
'压缩当前使用的数据库
'要引用Microsoft Office 10.0(或9.0) Object Library
'英文版Office：
'压缩当前使用的数据库
'要引用Microsoft Office 10.0(或9.0) Object Library
| 以下为引用的内容： Public Sub CompactDB() CommandBars("Menu Bar"). _ Controls("Tools"). _ Controls("Database utilities"). _ Controls("Compact and repair database..."). _ accDoDefaultAction End Sub |
或者：
'压缩当前使用的数据库
'要引用Microsoft Office 10.0(或9.0) Object Library
| 以下为引用的内容： Public Sub CompactDB() CommandBars("Tools").Controls(7).Controls(2).accDoDefaultAction End Sub |
注：运行本程序，你必须引用 Microsoft Office 9.0 Object Library (Office 2000)或 Microsoft Office 10.0 Object Library (Office XP)
评论 (0) All
