Compacting an Open Database using VBA

[dleiba]

Hey guys,

I am using Office XP to open an Access 2000 database (it opens in Access 2000 format by default).

I searched through previous threads and found the following command to compact my database when it is open.

SendKeys ("%(W1)&quot
SendKeys ("%(TDC)&quot

I put this code on the OnClick Event Procedure of a button on a form. However, nothing happens when I click the button.

Am I missing something?

Thanks

Dominic >:O>
dsleiba@capital-credit.com

 

[Databaseguy]

Actually, 2000 has a compact on open (or maybe close) switch or option somewhere. I'm not using 2000, so I can't tell you which menu it's on... Tyrone Lumley
augerinn@gte.net

http://server47.hypermart.net/databaseguy

 

[tempclerk]

Compact on Close under Tools, Options, General.