MS-ACCESSで、レコードセットを取得したい。

MS-ACCESS2000での質問です。
VBAのコードで、任意のテーブルから、レコードセットを取得して、ADO.Recordset変数に代入したいのですが、どのような記述をすれば、出来ますでしょうか？
最終的にはそのレコードセットの各レコードに操作をしたいのです。
よろしくお願いします。

No.1 ベストアンサー 回答者： noname#79209 回答日時： 2005/09/27 09:51

Dim rstTable as ADODB.Recordset

Set rstTable = New ADODB.Recordset
rsTable.open "テーブル名", CurrentProject.Connection

ですが、以降の処理は多岐にわたりますので、
「技術評論社」の「Access2002 表現百科850」

http://www.amazon.co.jp/exec/obidos/ASIN/4774115 …

という本をお求めになって、学習することをお勧めします。

この回答へのお礼

ありがとうございます。ＡＤＯという技術でかなりの事ができるようで、ご紹介いただいた書籍も今度購入してみることにします。本当に助かりました。

お礼日時：2005/09/27 18:25

No.2 回答者： O_cyan 回答日時： 2005/09/27 12:12

>任意のテーブルから、レコードセットを取得して・・

他のmdbファイルのテーブルから取得したい場合
他のmdbへの接続を確立させてテーブル名を指定すれば出来ます。
Dim cnn As New ADODB.Connection
Dim rec As New ADODB.Recordset

cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=C:\フルパス\ファイル名.mdb;"

rec.Open "テーブル名", cnn, adOpenKeyset, adLockOptimistic

でレコードセットを取得できます。

この回答へのお礼

ありがとうございました。ＡＤＯという技術でいろいろな事が出来るとわかりました。更に勉強してＤＢを改良していこうと思っています。でも、ＨＥＬＰの表現ってわかりにくいですね。今回はありがとうございました。助かりました。

お礼日時：2005/09/27 18:27