ＶＢからＡＣＣＥＳＳのデータを読み込むには？

解決

ちょうろう  2005-10-17 13:41:46  No: 126308  IP: [192.*.*.*]

はじめまして。
現在VBとACCESSを連携したプログラムを作成しようと考えています。仕様は以下の通りです。
・あるテキストファイルをVBで読み込み、配列に格納する。
・ACCESSに保存しているテーブルを読み込む。
・読み込んだテーブルを1行ずつ読み込み、テーブルの項目と配列の項目を比較し、同じ項目を探す。

ACCESSのデータをVBで取得することはできるのですが、一行ずつずらしていく方法がわかりません。よい知恵を頂きたく宜しくお願い致します。

編集 削除
いな  2005-10-17 13:45:53  No: 126309  IP: [192.*.*.*]

接続方式が分からないのですが、

MoveNextとか

編集 削除
もげ  2005-10-17 14:00:49  No: 126310  IP: [192.*.*.*]

仕様としては、
・あるテキストファイルをVBで読み込み、MDB内のテーブルAに格納する。
・ACCESSに保存しているテーブルBを読み込む。
・AとBを結合してキーが一致するデータを取り出す（選択クエリー）。
のほうがスマートな気がする。

編集 削除
ちょうろう  2005-10-17 14:15:27  No: 126311  IP: [192.*.*.*]

ご回答ありがとうございます。
接続方式はDAOを想定しています（別のHPでVBとACCESSはDAOで接続と書いてありましたので。お問合せの主旨が違いましたら、御指摘いただきたく）
またもげさんから御指摘頂きました通りの方法の方がスマートですね(^o^)こちらで対応させていただきたいと思います。
ちなみにMDB内に登録した後のSQLはVB内で定義できるのでしょうか。重ねての質問で恐縮ですが、御教示いただければ幸いです。

編集 削除
問題無し  2005-10-17 16:04:00  No: 126312  IP: [192.*.*.*]

VB内で定義できるのでしょうか
全然OKです

    strSQL = "SELECT * FROM テーブルA"
    Set rsMain = New ADODB.Recordset
    rsMain.Open strSQL, cnn1, adOpenStatic, adLockReadOnly
    If rsMain.EOF = True Or rsMain.BOF = True Then
        MsgBox "該当データがありません", vbCritical, "処理不能"
        Exit Sub
    End If

とかですかね

あ、ADOで書いたけど、基本同じなんで・・・

編集 削除
ちょうろう  2005-10-17 19:31:26  No: 126313  IP: [192.*.*.*]

問題なし様、もげ様、いな様
御忙しい中、御丁寧にご回答頂きありがとうございます。
頂戴した情報を元に、プログラム作成を進めたいと思います。
また御質問をこの掲示板にさせていただくこともあるかと存じますが、
その節もまたお力を頂戴できれば幸いです。
本当にありがとうございました。

編集 削除