在Access97里, 我们可以开一个资料库后, 利用工具-->资料库公用程式来压缩此一资料库,可是在压缩时, Access会先将此资料库"关闭", 再进行压缩,然后再开启压缩后的资料库,那么我该如何在表单的这个按钮做呢??因为DBGird这个控件仍和资料库做连结, 所以我无法"关闭"数据库...
这样的话,我们只有先关闭被打开的表和字段,然后再关闭数据库就OK了;
Sub Update()
Data1.Recordset.Close
Data1.Database.Close
DBEngine.CompactDatabase "SourceDatabase", "TargetDatabase" ' 压缩数据库
End sub
更多辅导资料请关注青年人计算机等级站。
责任编辑：cyth
