Visual Basicから起動中の特定のmdbファイルを終了したい

Visual Basicのコマンドボタンを押すことで、起動中の特定のmdbファイル（例えば　C:\生徒管理\2学年.mdb）を終了したいのですが、どう記述すればよいのでしょうか？
困っています。よろしくお願いします。

No.1 ベストアンサー 回答者： taka_tetsu 回答日時： 2002/06/02 11:37

特定のmdbファイルを終了したいというのは、

あるmdbを開いているAccessを終了させたいということで
いいでしょうか？

という前提でいきます。あと、確認したのがVB6.0、Access2000なので、Accessのバージョンによっては
（特に97、95）では動かないかもしれません。

１．GetObjectで、引数で指定したファイルを開いているAccessのオブジェクトを取得します。

２．取得できたら閉じるだけ

以上です。

一応サンプルを。
Dim ac As Object

Set ac = GetObject("C:\生徒管理\2学年.mdb")
ac.DoCmd.Quit
Set ac = Nothing

DoCmd.Quitは、終了のさせ方でパラメータがありますので
詳しくはAccessのVBAのヘルプで確認してください。

この回答へのお礼

ご指摘の前提のとおりです。
頂いたサンプルを、そのまま貼り付けて試してみたところ
上手くいきました。ありがとうございました。

お礼日時：2002/06/03 13:44