VBでAccessの最適化

質問

VB6+Access2003でプログラムを作成しています。
Accessの最適化の方法について教えてください。
AccessのオプションにDBを閉じるときに最適化するというのがありますが
そちらで最適化されるようにしておくほうがよいののでしょうか？
VBで最適化するようにプログラミングしたほうがよいのでしょうか？
(プログラム内で何度もAccessをOpen/Closeしています)

回答No.2

sendaitaro

＃１です。
ＶＢからＡＣＣＥＳＳを
操作した時のテンポラリーファイルが
ＡＣＣＥＳＳの中にそのまま残る
みたい（多分）なので最適化したほうが
良いと思います。

お礼

Accessの機能は関係ないようでした。。。＞＜
VBで作成してみます。
いろいろとありがとうございました。

補足

Accessのオプション機能でDBを閉じるときに最適化するように設定したのではだめですか？
勉強不足ですみません。。。

回答No.1

sendaitaro

暫くさわってないので、
こんな感じでは
Dim NewDbName As String
Dim SaveName As String
'Access.Mdbの最適化
SaveName = DbPath
NewDbName = Replace(DbPath, "XX.mdb", "") 'Work作成の為DB名を抜き出す
NewDbName = NewDbName & "XXNEW.mdb"
DBEngine.CompactDatabase DbPath, NewDbName, , , ";pwd=パスワードを記述"
Kill DbPath
Name NewDbName As SaveName
DbPathはＭＤＢのパスです。
多分動作すると思います。
間違ってたらごめんなさい。

お礼

やっぱりVBで最適化したほうがよいのかな？
ご回答ありがとうございました。