キクエリを定義からのジェット経由でデータベースに対する検査

Question

私にはプログラムデ2010年ジェット（mdb）のデータベー ADO.うきはの定義の一部のクエリのデータベースの表示に使用しています。これにはSQLは、ADOインターフェースによるinterrogatingデータベースをもっていなかったのでしょうかる権利をMSysObjects).

Answer 1

こうした情報の利用によADOXます。あの概要apiにいくつかの事例ではありませんでDelphi） MSDNサイト.

基本的にはうまいは輸入のADOX型図書館を使用してラッパー生成されるまでのアクセス元のAPIとなります。から、簡単にナビゲの階層のデータがあります。

る必要がありまアクセスの特定 ビューオブジェクト, かのコマンドの物件です。

Answer 2

DAO経由では、とても簡単です。各QueryDefのSQLプロパティを抽出するだけです。アクセス内からのdaoで、それは次のとおりです。

  Dim db As DAO.Database
  Dim qdf As DAO.QueryDef

  Set db = DBEngine.OpenDatabase("[path/name of database]")
  For Each qdf In db
    Debug.Print qdf.SQL
  Next qdf
  Set qdf = Nothing
  db.Close
  Set db = Nothing

それを翻訳する方法はわかりませんが、Adoxの代わりにDAOを使用することに慣れたら、最も簡単な方法だと思います。

私はADOをまったく使用していませんが、ビューのコレクションがあり、SQLプロパティが選択されたクエリで機能すると推測しています。ただし、すべての保存されたQueryDefのSQLを取得することに興味がある場合は、DMLクエリを確認する必要があるため、ストアドプロシージャを確認する必要があります。そのために構文を調べる必要がありますが、ADOを介して情報に到達する方法だと確信しています。