x adO , utilizza il jro, devi aggiungerlo da > strumenti > riferimenti
codice:
JRO.CompactDatabase (sorgente as string, destinazione as string)