Distinct使用時に0除算エラーが起こる

質問

初めて投稿します。よろしくお願いします。
現在、VB6とアクセス９７で構築されたシステムのメンテナンスを行なっています。下記SQLの実行時に0で除算しましたのエラーが出ます。

select * from [ SELECT DISTINCT NO FROM 指示書]. AS NOリスト order by iif(NO = "0", 9999999 ,NO)

色々試してみましたが解決方法が見つからないので質問しました。

ちなみに、アクセス内で"SELECT DISTINCT NO FROM 指示書"というクエリを作成し実行しておくとエラーが出ずに正常に動作します。

よろしければ、ご教授よろしくお願いします。

回答No.2

chie65535 · ベストアンサー

Access97でサブクエリを使うと、特定の条件下で、メモリぶっ壊して変なエラー吐いて止まる事があるので、サブクエリは使わないように。

つまり「メモリぶっ壊して暴走して、変なエラーで止まってる」のですよ。

なので

＞SELECT DISTINCT NO FROM 指示書"というクエリを作成し

作成したクエリに対してクエリをかけるとか、色々と小細工が必要になります。

例えば、

SELECT DISTINCT IIF(NO="0",9999999,NO) AS NNO,NO FROM 指示書

を「クエリ１」として保存しておいて

SELECT NO FROM クエリ１ ORDER BY NNO

と言うクエリを発行するとか。

ともかく「select * from [ SELECT ～～ ]は使っちゃいけない」ので注意すべし。

あと、VBコードを書く時も、ある特定の条件下で「VBのコンパイラが実行時エラーを吐いて、何も出来なくなる」ので注意。

お礼

ありがとうございました。解決しました。

回答No.1

めとろいと（@naktak）

そのSQLでは、0除算をやろうと思ってもできないと思いますが。
割り算ないし。

補足

そうなんです。自分もそう思うんですが、0除算のエラーを返すんですよ。エラーに成るSQLでクエリーを作成実行するとアクセスが死にます。