怎样用vb把数据库（Access)压缩和修复

以前使用 DAO 時，Microsoft 有提供 CompactDatabase Method 來压缩 Microsoft Access 文件，RepairDatabase Method 來修复损坏的 Microsoft Access 文件，。可是自从 ADO 出來之后，好像忘了提供相对的压缩及修复 Microsoft Access 文件的功能。

現在 Microsoft 发现了这个问题了，也提供了解決方法，不过有版本上的限制！限制說明如下：

ActiveX Data Objects (ADO), version 21

Microsoft OLE DB Provider for Jet, version 40

這是 Microsoft 提出的 ADO 的延伸功能：Microsoft Jet OLE DB Provider and Replication Objects (JRO)

这个功能在 JET OLE DB Provider version 40 (Msjetoledb40dll) 及 JRO version 21 (Msjrodll) 中第一次被提出！

這些必要的 DLL 文件在您安裝了 MDAC 21 之后就有了，您可以在以下的网页中下载 MDAC 的最新版本！

Universal Data Access Web Site

在下载之前先到 VB6 中檢查一下，控件設定引用項目中的 Microsoft Jet and Replication Objects XX library 如果已经是 21 以上的版本，您就可以不用下载了！

1、新建一個新表单，选择功能表中的控件設定引用項目。

2、加入 Microsoft Jet and Replication Objects XX library，其中 ( XX 大于或等于 21 )。

3、在适当的地方加入以下的程序代码，記得要修改 data source 的內容及目地文件的路径：

Dim jro As jroJetEngine

Set jro = New jroJetEngine

jroCompactDatabase "Provider=MicrosoftJetOLEDB40;Data Source=d:\

wind2mdb", _ '來源文件

在 DAO 360 之后，RepairDatabase Method 已经无法使用了，以上的程序代码显示了 ADO CompactDatabase Method 的用法，而它也取代了 DAO 35 時的 RepairDatabase method！

该定期对Microsoft Access 文件进行压缩和修复。而且当Microsoft

Access 文件在使用过程中发生了严重的错误时，同样也能使用“压缩

和修复数据库”功能恢复Microsoft Access 文件。

工具/原料 Microsoft Office Access 2003

压缩和修复未打开的 Access 文件

第1步骤： Microsoft Office Access 2003

第2步骤： 1 启动Microsoft Office Access 2003，单击“工具”

菜单，打开的菜单指向“数据库实用工具”，在下一级菜单中单击“

常规办法：

1）删除不必要的数据和无用的ACCESS数据库对象例如表、查询、窗体和模块等；

2）压缩数据库

ACCESS2003压缩举例：打开数据库，点击菜单（工具）——数据库实用工具——压缩和修复数据库

非常规办法：

ACCESS数据库经过一段时间添加、更改和删除数据库对象后会产生很多代码及数据库对象碎片和垃圾，对于这些东西常规办法是无法清除的。这也是为什么你的ACCESS数据删除很多数据后，大小不变的原因所在。

怎么办呢？可以这样做：先建立一个同名空白数据库，放在另一个文件夹下，接着打开该空白数据库，导入原数据库全部有用的对象（包括：表、窗体、查询、模块、页、宏，无用的不要导入）

ACCESS2003导入对象举例：文件——获取外部数据——导入 ，打开“导入”对话框选择需要缩小的数据库后，点击导入按钮，打开“导入对象”对话框 选择全部有用的数据库对象，例如表、窗体等等后点击“确定”按钮 完成导入全部数据库对象。

经过上述过程后，所有的数据库垃圾都会被清除掉。再对其进行一次压缩 *** 作，ACCESS数据库将会处在理论上最小状态。

以上就是关于怎样用vb把数据库（Access)压缩和修复全部的内容，包括:怎样用vb把数据库（Access)压缩和修复、怎样压缩和修复Access文件、怎样减少ACCESS数据库大小等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！