Ｐａｇｅ 656 ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ 通常モードに戻る ┃ ＩＮＤＥＸ ┃ ≪前へ │ 次へ≫ ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ ▼SQLステートメント ch1nu 04/6/5(土) 12:51 ┗Re:SQLステートメント Gin_II 04/6/5(土) 14:39 ┗Re:SQLステートメント ch1nu 04/6/5(土) 18:31 ┗Re:SQLステートメント Gin_II 04/6/5(土) 21:34 ┗Re:SQLステートメント ch1nu 04/6/6(日) 20:38 ─────────────────────────────────────── ■題名 ： SQLステートメント ■名前 ： ch1nu <ch1nu@lime.ocn.ne.jp> ■日付 ： 04/6/5(土) 12:51 -------------------------------------------------------------------------
| SQLに関する質問です。 SQLを使ってレコードを選択し、それをフォーム上のテキストに表示したいのですが、 SQLから値を取ってこれません。 どうしたらよいのでしょうか？ まずフォームから得意先コードを入力し、AfterUpdateのイベントとして、以下 を行いたいのです。 Dim CustomerCode as string CustomerCode = "SELECT 得意先名 FROM 得意先テーブル WHERE 得意先コード = 'フォームから選択した得意先コード'" シングルクオーテーション等々色々試してはみたのですが、なかなか、うまく値が取得できません。 よろしくお願いしますm(__)m |
| > 以下を行いたいのです。 変数にSQL文を代入しているだけなので、その後何をしたいのか 分かりませんが、 CustomerCode = "SELECT 得意先名 FROM 得意先テーブル " _ & "WHERE 得意先コード = '" & Me!テキストボックス名 & "'" のように修正してみてください。 ＃得意先コードフィールドがテキスト型の場合。 |
| ▼Gin_II さん： >> 以下を行いたいのです。 >変数にSQL文を代入しているだけなので、その後何をしたいのか >分かりませんが、 > >CustomerCode = "SELECT 得意先名 FROM 得意先テーブル " _ > & "WHERE 得意先コード = '" & Me!テキストボックス名 & "'" > >のように修正してみてください。 >＃得意先コードフィールドがテキスト型の場合。 Gin_IIさんありがとうございました！ でも、これを DoCmd.RunSQL CustomerCodeってやっただけでは意味ないですよね？ それより、変数に取得した値を入れたかったのです。 何かいい方法はありますか？ |
| >DoCmd.RunSQL CustomerCodeってやっただけでは意味ないですよね？ > >それより、変数に取得した値を入れたかったのです。 最初に、そのように質問していただくと、きちんと回答できたのですが。。 DLookup 関数を使ってください。 Me!代入先テキストボックス名 = DLookup("[得意先名]","[得意先テーブル]", _ "[得意先コード]='" & Me!テキストボックス名 & "'") |
| ▼Gin_II さん： >>DoCmd.RunSQL CustomerCodeってやっただけでは意味ないですよね？ >> >>それより、変数に取得した値を入れたかったのです。 > >最初に、そのように質問していただくと、きちんと回答できたのですが。。 > >DLookup 関数を使ってください。 > >Me!代入先テキストボックス名 = DLookup("[得意先名]","[得意先テーブル]", _ > "[得意先コード]='" & Me!テキストボックス名 & "'") 済みません(~_~;) ありがとうございました〜♪ これからは、きちんと的を得た質問方法を心がけます。 |