iserease のDB2 UDBに対してODBC接続のVBAでSQL

質問

iserease のDB2 UDBに対してODBC接続のVBAでSQLを書いています。
下の構文のWHERE句に対しOR条件を加えると
読むレコードがゼロ件になってしまいました。

QSQL = QSQL & " WHERE TNO='" & PTNO & "'"
QSQL = QSQL & " OR TNO='" & PSPC & "'"

１行目のPTNOの指定だけだと抽出できます。
なぜでしょうか。よろしくお願いします。

回答No.2

ShowMeHow · ベストアンサー

同じようにやってみましたが、私は普通にレコードが取得できます。

レコードセットを開く直前に、ＱＳＱＬをmsgboxか何かに出力して
意図したsqlになっているか再確認してみてはいかがでしょうか。

お礼

前述の構文のすぐ前にあるLeft join が原因でした。
存在しないデータをLeft joinしようとした場合ゼロ件（？）になってしまうようでした。
MSGBOXで見てたらわかりました。ありがとうございました！

補足

ちゃんとなってました,,,

回答No.1

1050 円（@1050YEN）

OR条件を加えるとゼロ件って不思議ですね。。。

原因はわかりませんが、以下の場合はどうなりますか？

QSQL = QSQL & " WHERE TNO IN ('" & PTNO & "', '" & PSPC & "')"

お礼

ありがとうございました！

補足

一緒でした。TNOがPTNOの場合のみデータが取れました。