Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1811 / 2272 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【5142】フォームの抽出条件から複数TBLを内部結合したいのですが orange 05/5/27(金) 16:31 質問[未読]
【5147】Re:フォームの抽出条件から複数TBLを内部... 小僧 05/5/29(日) 11:25 発言[未読]
【5153】Re:フォームの抽出条件から複数TBLを内部... orange 05/5/30(月) 10:11 回答[未読]
【5155】Re:フォームの抽出条件から複数TBLを内部... 小僧 05/5/30(月) 10:54 回答[未読]
【5159】Re:フォームの抽出条件から複数TBLを内部... orange 05/5/30(月) 13:58 お礼[未読]
【5142】フォームの抽出条件から複数TBLを内部結合...
質問  orange  - 05/5/27(金) 16:31 -
引用なし
パスワード
   こんにちわ。またまた質問です。

フォームから検索したいコードを２種類入力し、
AのTBLからは名称を取得し、BのTBLからは台帳情報を取得し
フォームに結果を表示したいのです。

INNER JOINをしようしてみたのですが、複数の検索条件の場合の記述方法がよくわかりません。

現在はこんな感じで実行すると構文エラーです。。。。。

strSQL1 = "SELECT 台帳.支社, 台帳.番号, 口座.名称," _
　　　　　& "台帳.内容１, 台帳.内容２, 台帳.内容３," _
　　　　　& "FROM (台帳 INNER JOIN 口座 ON " _
　　　　　& "台帳.口番号 = 口座.番号 and 台帳.支社 = 口座.支社) " _
　　　　　& "WHERE 口座.支社 ='" & Me.支社 & "' AND 口座.番号='" _
　　　　　& Me.番号 & "';"

どこがどうだめでしょうか？
また、INNER JOINではできないのでしょうか？
UNION句にも挑戦したのですが、イメージが違っているような気がしました。
根本的に使う命令が間違っているようでしたら、他によい方法などお願いします。
【5147】Re:フォームの抽出条件から複数TBLを内部...
発言  小僧  - 05/5/29(日) 11:25 -
引用なし
パスワード
   ▼orange さん：
こんにちは。

テーブルの内容をご提示して頂けると回答がつきやすくなるかと思われます。

テーブル：台帳
支社（テキスト型）
番号（数値型）
・
・
・

などなど…。
【5153】Re:フォームの抽出条件から複数TBLを内部...
回答  orange  - 05/5/30(月) 10:11 -
引用なし
パスワード
   こんにちわ。

台帳TBL、口座TBLともに項目は全てテキスト型です。

よろしくお願いします。
【5155】Re:フォームの抽出条件から複数TBLを内部...
回答  小僧  - 05/5/30(月) 10:54 -
引用なし
パスワード
   ▼orange さん：
こんにちは。

こちらとしては strSQL1 から想像する事しかできないのですが…。

台帳　　　　　　　　口座
口番号　−−−　 番号
支社　　−−−　　支社
番号　　　　　　　　 名称
内容１
内容２
内容３

こんな感じでしょうか…。

>strSQL1 = "SELECT 台帳.支社, 台帳.番号, 口座.名称," _
>　　　　　& "台帳.内容１, 台帳.内容２, 台帳.内容３," _
>　　　　　& "FROM (台帳 INNER JOIN 口座 ON " _
>　　　　　& "台帳.口番号 = 口座.番号 and 台帳.支社 = 口座.支社) " _
>　　　　　& "WHERE 口座.支社 ='" & Me.支社 & "' AND 口座.番号='" _
>　　　　　& Me.番号 & "';"

よく見るとSELECT句の最後が「,」になってますね。
FROM句との間に必要な半角スペースに変えるだけで動くかもしれませんね。
【5159】Re:フォームの抽出条件から複数TBLを内部...
お礼  orange  - 05/5/30(月) 13:58 -
引用なし
パスワード
   ありがとうございました。
ほんとですね。いらないカンマが原因でした。

初歩的なミスでお手数おかけしました。すみません。

もっとちゃんとチェックしてから投稿するよう気を付けますので、
見捨てないでくださいね。（おねがいします。）

本当にいつもありがとうございます。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1811 / 2272 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
1081094
(SS)C-BOARD v3.8 is Free