Visual Basic - Compactar BD

Ne cesito saber como compactar una base de datos en acces 2000 con ADO ya que DBEngine.CompactaDataBase se utiliza para DAo y tambien como rapararla DBEngine.RepairDataBase.

De antemano gracias

1. Debes crear una referencia a \"Microsoft Jet and Replication Objets 2.5 Library\".
2. Creas un objeto JRO.JetEngine
3. Y ejecutas <Objeto>.CompactDatabase, con los parámetros necesarios

Espero que te funcione