This code will show you how to compact an access database (As you can do from Microsoft Access Application) from Visual Basic using code.
to DAO: from the menu choose Project-> References, mark the Microsoft DAO 3.6 (or
3.51) Object Library check box, and press OK.
Add 1 Command Button to your form. Press the
button to compact the database.
If you got
"Unrecognized Database format" error message:
If you using database that made in Access 2000 and you don't
have Microsoft DAO 3.6 Object Library reference, click on browse, and select
the file C:\Program Files\Common Files\Microsoft Shared\Dao\dao360.dll (If you
have Access 2000 installed in your computer you have this file.) This will add Microsoft DAO 3.6 Object Library reference
Now mark it
and press OK.
Private Sub Command1_Click() '
this line will compact the "c:\myDir\db1.mdb" database to
"c:\myDir\db2.mdb". ' after this line had been called you will have the
original ' uncompacted database in "c:\myDir\db1.mdb" ' and the new
compacted database in "c:\myDir\db2.mdb".
DBEngine.CompactDatabase "c:\myDir\db1.mdb", "c:\myDir\db2.mdb" End Sub