Compact Repair Database

[ramdil]

HI All

Currently i have a access database and i am currently doing compact and repair using the tool in database.Can any one help me by giving me the code for doing the same thing so that i can call that method in a button click so that users can do it their own.Thanks in advance

[blad3runn69]

depends on the version of access. see http://www.thescripts.com/forum/thread568193.html , looks a bit trickier with ms access 97

If you are using 2000+ maybe try

add a new module
add function (must be only code in module):

Function CompactRepair()
CommandBars("Menu Bar"). _
Controls("Tools"). _
Controls("Database utilities"). _
Controls("Compact and repair database..."). _
accDoDefaultAction

End Function

call the function from your buttons Click event
I have tried on msaccess 2002/2003 and works OK.

good luck ramdil :)

[missinglinq]

Important to remember is that compacting a database is a common cause of corruption! It should never, ever be done until the db has first been backed up!

Linq ;0)>

[blad3runn69]

excellent point missinglinq, and thank you for a great mousemove tutorial :)

[missinglinq]

You're welcome, Blad3! The How To section is always a great place to browse thru when you have a few minutes! Lots of great stuff in their, all of it generated because it addresses things that have been asked beacoup times.

Linq ;0)>

[ramdil]

Thanks for the replies.I will try and get back to you .Any thanks for all responses.

depends on the version of access. see http://www.thescripts.com/forum/thread568193.html , looks a bit trickier with ms access 97

If you are using 2000+ maybe try

add a new module
add function (must be only code in module):

Function CompactRepair()
CommandBars("Menu Bar"). _
Controls("Tools"). _
Controls("Database utilities"). _
Controls("Compact and repair database..."). _
accDoDefaultAction

End Function

call the function from your buttons Click event
I have tried on msaccess 2002/2003 and works OK.

good luck ramdil :)