他の MDB ファイルにあるオブジェクトの削除 |
対象バージョン : 97, 2000(MDB), 2002(MDB), 2003(MDB)
最終更新日 : 2005/04/25
(オリジナル作成日:1997/10/29)
概 要
現在開いているデータベース以外の MDB ファイルにあるオブジェクトを削除する方法です。
解 説
【方法1】
DoCmd オブジェクトの DeleteObject メソッドを利用する方法です。
Dim obj As Object Set obj = GetObject("フルパス指定の MDB 名") obj.DoCmd.DeleteObject acForm, "フォーム名" Set obj = Nothing
この方法は、DeleteObject メソッドで指定する objecttype で指定できるオブジェクト(DeleteObject のヘルプをご参照ください)であれば可能です。
【方法2】
DAO オブジェクトの Delete メソッドを利用する方法です。
Dim db As Database Set db = DBEngine(0).OpenDatabase("フルパス指定の MDB 名") db.QueryDefs.Delete "クエリー名"
この方法は、DAO オブジェクトで Delete
メソッドが指定できるコレクションであれば可能です。
くわしくは Fields, Indexes, Properties, QueryDefs, Relations, TableDefs, Users
の各コレクションのヘルプをご参照ください。