在Access97里, 我們可以開一個資料庫后, 利用工具-->資料庫公用程式來壓縮此一資料庫,可是在壓縮時, Access會先將此資料庫"關(guān)閉", 再進(jìn)行壓縮,然后再開啟壓縮后的資料庫,那么我該如何在表單的這個按鈕做呢??因為DBGird這個控件仍和資料庫做連結(jié), 所以我無法"關(guān)閉"數(shù)據(jù)庫...
這樣的話,我們只有先關(guān)閉被打開的表和字段,然后再關(guān)閉數(shù)據(jù)庫就OK了;
Sub Update()
Data1.Recordset.Close
Data1.Database.Close
DBEngine.CompactDatabase "SourceDatabase", "TargetDatabase" ' 壓縮數(shù)據(jù)庫
End sub