VB6.0用掲示板の過去のログ(No.1)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [過去ログ] [管理用]

投稿日: 2002/09/20(Fri) 17:00
投稿者とろ
Eメール
URL
タイトルRe: ADOでテーブルの存在の確認

> ADO接続でAccess2000のMDBの中に、指定のテーブルがあるかどうか確認したいのですが、
> SQL文で結果セットを取得する前に確認する方法はないでしょうか。

ADO の場合は、テーブルの情報やフィールドの情報などは、
すべてクエリ(スキーマ?)を発行することによって、取得します。
例えば、次のような感じ。

  Dim oConnection As ADODB.Connection
  Dim oRecordset  As ADODB.Recordset
  
  Set oConnection = New ADODB.Connection
  oConnection.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\Sample.mdb;"
  
  Set oRecordset = oConnection.OpenSchema(adSchemaTables)
  Do While oRecordset.EOF = False
    Debug.Print oRecordset!TABLE_NAME
    oRecordset.MoveNext
  Loop
  
  oRecordset.Close
  oConnection.Close
  
  Set oRecordset = Nothing
  Set oConnection = Nothing


- 関連一覧ツリー (★ をクリックするとツリー全体を一括表示します)

- 返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)

- Web Forum -