Compressing access database using vb6.0



i m using vb6.0 for my application and want to delete all the data
after some time and same time wanna to compress the database also.

i m using ado connective to connect to database

.