アクセス+VBA 最適化

アクセス+ＶＢＡです。
データをどんどん削除していき、最後にはデータが空になったら最適化をしたいのですが、そのコードが書けません。
DoCmd.DoMenuItem ～～では出来ないみたいで・・・

No.1 ベストアンサー 回答者： 1050YEN 回答日時： 2006/06/01 19:35

DoCmd 最適化

で履歴を検索をしたら、いっぱいありますよ

http://okwave.jp/kotaeru.php3?q=391558

この回答への補足

ありがとうございます。
＃２さんの補足にも書きましたが、最適化の解除ができなくなりました。
お助けを・・・・

補足日時：2006/06/01 23:49

No.3 回答者： ese_ee 回答日時： 2006/06/05 13:23

「閉じるとき最適化」を有効にして最適化した場合は、

どこかでそれを無効にする必要があります。

よくあるやり方としては、
http://www.accessclub.jp/samplefile/samplefile_7 …
http://homepage2.nifty.com/MrUr/katuyo/saiteki.htm
http://www.geocities.jp/cbc_vbnet/download/compa …
がよろしいかと。

参考URL：http://www.accessclub.jp/samplefile/samplefile_7 …

この回答への補足

フォームを最初に開く時に
SetOption "Auto Compact", False
として、無効にしてるのですが・・・

補足日時：2006/06/08 01:56

No.2 回答者： _tomo_ 回答日時： 2006/06/01 21:27

方法は違いますが・・・

Accessの終了時にバッチを起動して最適化する方法もあります。

"c:\Program Files\Microsoft Office\Office\MSAccess.exe" "対象のAccess.mdb" /compact

また、自身のAccessファイルを最適化するのであれば以下の方法もあります。

メニュー［ツール］－［オプション］－［全般］タグの［閉じる時に最適化する］にチェックをする

この回答への補足

下記のようなコードにしました。

～～～
データが削除されカラになった
～～
SetOption "Auto Compact", True
DoCmd.Close
SetOption "Auto Compact", False
DoCmd.OpenForm ("フォーム")
～～
最適化された状態で最初からデータを入れれる。
～～

としたら、めでたく最適化してくれたのですが、
SetOption "Auto Compact", False
と、記述しても解除されなくなりました。

別フォルダにある関係ないアクセスデータベースまで最適化されます。
メニュー＞ツール＞オプション＞全般＞閉じる時に最適化するもチェックはされていません。

どうしたら、解除できるでしょうか？

補足日時：2006/06/01 23:47