小弟使用下面方法壓縮資料庫
Dim jro As jro.JetEngine
Set jro = New jro.JetEngine
jro.CompactDatabase "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\comp1.mdb", _ '來源資料庫
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\comp2.mdb;Jet OLEDB:Engine Type=4" '目的資料庫
但發生以下錯誤：
{執行階段錯誤，-2147467259(80004005)，無法執行此運算，此版本的功能在舊格式資料庫無效 }
而小弟的設定如下：
Microsoft DAO 3.6 Object Library
Microsoft Jet and Replication Objects 2.1 library
vb6.0
Access 2000
請問應如何解決。
亦可以e_mail到我的信箱中，
謝謝
rock 敬上