我给某公司做了个程序，ADO＋Access，记录数已七千多，但增加不快，可文件的尺寸却增加的很快！

Question

在程序里也可以压缩，参考一下ADo程序员参考

Answer 1

能帮我吗？具体一点，ADo程序员参考，我没有呀！

Answer 2

一般在C:\Program Files\Common Files\Microsoft Shared\DAO\目录下有DAO的帮助～～
CompactDatabase method是压缩数据库的～～里面有例子～～不过是VB的很简单～～看一下就知道了～

Answer 3

我的C:\Program Files\Common Files\Microsoft Shared\DAO\目录下只有一个文件dao360.dll？哪有帮助文件啊？

Answer 4

有一个delphi的ado升级程序
建议升级一下delphi，可以找到ado的程序员参考

Answer 5

to daystar 我用的是delphi6

Answer 6

Access对于Delete的操作是将该记录打上删除标记，出于效率方面的考虑，并不直接在MDB文件中将记录删除。对于Update语句的处理是分解为Delete Old和Insert New两个操作。所以也会造成文件中出现已经被删除的记录。
没有什么完美的解决方法，你可以在程序里加上压缩数据库的功能。定期或者由用户调用来清理MDB文件中的废数据。
DBEngine.CompactDatabase

Answer 7

uses DAO2000 ；
var
   Engine:DBEngine;
begin
   Engine:=CoDBEngine.Create;
   dm.ADOConnection1.Close;
   Engine.CompactDatabase('.\data\cgdata.mdb','.\data\cgnew.mdb','',0,'');
   DeleteFile('.\data\cgdata.mdb');
   RenameFile('.\data\cgnew.mdb','.\data\cgdata.mdb');
end;
我用以上代码能实现了，这是在我自己的环境中“win2K＋office2K”，如果要同时能在win95，win98，office97上使用，该怎么办