こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

解決済みの質問

ACCESSでSQL文を実行した結果を参照したいのですが。

どなたか助けてください。
環境はWin98 ACCESS2000です。

画面で入力されたコードをもとに、そのコードがテーブルに存在した場合とない場合で次画面のフォームで処理を分けたいと考えています。そのため、SQLを実行した結果の別のコードを参照したいのですが、参照の仕方がわかりません。

コードの検索画面のクリック時のイベントプロシジャ内で
Private Sub Cmd_Find_Click()

Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim mySql As String
Set db = CurrentDb()
mySql = "SELECT T_Name FROM T_テーブル " _
& "WHERE T_Code = " & Frm_Code
Set rs = db.OpenRecordset(mySql)

If rs.EOF Then
    ・・・ない場合の処理
Else
Set Me.Recordset = rs
→   ココでSELECT文で実行したT_Nameを参照したい
End If
Set rs = Nothing
Set db = Nothing
End Sub
T_テーブル内にT_NameとT_Codeがあり
フォームのテキストボックスの値のFrm_Codeを条件に検索した結果のT_Nameを参照したいのです。
フォームは非連結で処理を行いたいのですが、どのように参照すればいいのでしょうか。本で調べたところ、普通にT_Nameを使っているのですがうまくいきません。
どなたか下手な説明で申し訳ありませんがお願いします。

投稿日時 - 2002-10-21 00:19:08

QNo.385782

すぐに回答ほしいです

質問者が選んだベストアンサー

こんにちは

参照という意味が曖昧なので?ですが
dim w_name



'→   ココでSELECT文で実行したT_Nameを参照したい
w_name = rs!T_Name

でT_Nameの結果を見ることができます

が、こういう意味ではない?

投稿日時 - 2002-10-21 09:13:44

お礼

ありがとうございます!私の説明がうまくないのにわかってくださって!そうです、結果を見たかったんです。ありがとうございます。できました。本だとフォームとテーブルが連結しているものしか載っていなくて困っていました。本当にありがとうございました。

投稿日時 - 2002-10-21 21:10:45

このQ&Aは役に立ちましたか?

0人が「このQ&Aが役に立った」と投票しています

回答(1)

あなたにオススメの質問