VB(dao)でSQLのwhereの中にSelectを入れるには


dunno  2007-06-12 20:51:11  No: 136690

すみません!教えて下さい。

下記のプログラムにのWHEREのところにSelect Distinctを入れる方法を教えていただけませんか。自分でもいろいろ試したり調べたりしてみましてけど、、どれも上手くいかなくて、、変更前を変更後にするのにはどうしたらいいでしょうか?ご存知の方、教えて下さい!!

【変更前】
   sSql = ""
    sSql = sSql & " SELECT DISTINCT 得意先名称"
    sSql = sSql & " FROM    MST得意先"
    sSql = sSql & " WHERE   得意先コード = '" & rs(2) & "' ;"

【変更後】
   sSql = ""
    sSql = sSql & " SELECT DISTINCT 得意先名称"
    sSql = sSql & " FROM    MST得意先"
    sSql = sSql & " WHERE   得意先コード = (Select Distinct '" & rs(2) & "' ;")

と、Whereの中に Select Distinctを入れる方法を教えて下さい!!
お手数ですが、お願いします!!


まさやん  2007-06-12 21:44:47  No: 136691

rs(2)って何?レコードセット?
そもそも、板違いじゃないですか?

質問の意図が分からないので、推測ですが…
SELECT 得意先名称
FROM   MST得意先
WHERE  得意先コード IN (SELECT DISTINCT 得意先コード
                        FROM   テーブル名
                        WHERE  条件式)

だと思いますけど、如何でしょうか?
(INの後ろに、rs(2)のレコード条件を入れる)


dunno  2007-06-12 22:08:45  No: 136692

わかりにくい質問ですみません!!
参考になりました!!ありがとうございます!


※返信する前に利用規約をご確認ください。




  


  このエントリーをはてなブックマークに追加