Access删除数据后还那么大，可以用VB进行修复吗？（来者有分）

Question

求一个用VB进行修复的例子，时在没有VB的程序，vc++或c#的也可以。
我知道用Access中的工具...可以修复。
现在我想自己编程序修复。

Answer 1

修复什么,就是压缩!!
ADO可以!!

Answer 2

DBEngine.CompactDatabase App.Path & "\File1.mdb", App.Path & "\File2.mdb", dbLangGeneral, dbVersion30

Answer 3

引用 Microsoft Jet and Replication Objects X.X library，其中 ( X.X 大于或等于 2.1 )。在适当的地方加入以下的程序代码，記得要修改 data source 的內容及目地文件的路径：Dim jro As jro.JetEngine
Set jro = New jro.JetEngine
jro.CompactDatabase "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\\nwind2.mdb", _ '來源文件
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\\abbc2.mdb;Jet OLEDB:Engine Type=4" '目的文件

Answer 4

access菜单上有数据压缩的功能

Answer 5

http://www.sijiqing.com/vbgood/experience/index.asp?action=read&id=540