vbの初心者です。質問です。

ある特定の条件を2つ満たしたレコードを検索して、
そのレコードをカレントレコードとしたいのですが...

条件が一つであれば、FindFirstを使って、

*--------------
変数宣言は省略
*--------------

Set db = DBEngine.Workspaces(0).OpenDatabase("データベース名")
Set rsDAO = db.OpenRecordset("テーブル名", dbOpenDynaset)

kensaku = "irai_no = '100'"

rsDAO.FindFirst kensaku

などとすれば、テーブルのirai_noフィールドが "100"の最初のレコードがカレントレコード
となるというのはわかっているのですが...

それでは、もう一つ条件として"gyosya_nm='ABCD'"も満たす、つまり
2つの条件を満たすレコードを検索するにはどうすれば良いですか?

できれば、一つの命令でお願いしたいです。
宜しくお願い致します。

A 回答 (1件)

こんにちは。

maruru01です。

kensaku1 = "irai_no = '100'"
kensaku2 = "gyosya_nm = 'ABCD'"

rs.DAO.FindFirst kensaku1 & "AND" & kensaku2

でいいと思います。
ちなみに、

kensaku = "irai_no = '100' AND gyosya = 'ABCD'"

rs.DAO.FindFirst kensaku

でももちろんいいです。
では。
    • good
    • 0
この回答へのお礼

実はANDでつなげてFindFirstで試していたのですが、
検索内容とANDの間にスペースを入れていなかったので
エラーになっていたようです。

おかげさまで出来ました。ありがとうございます.

お礼日時:2001/12/21 14:49

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!


人気Q&Aランキング

おすすめ情報