いつもお世話になってます。
sasakidと申します。
現在、ASPで開発を進めています。
エラーが発生したらエラーページに飛ぶように適所に
以下の文を入れています。
'------エラー処理--------
If Err.Number <> 0 Then
Call goto_ErrPage() ←…エラーページに飛ぶ関数
End If
ほとんどの個所でエラーページに飛ぶことを確認しました。
今、困っていることはSQL文を実行する関数内で
SQL文にエラーがあったとしてもどうやらエラーが検知されていないようなのです。
'=====SQL文実行関数===========
Function exeSql1(sql)
exeSql1 = -1 'エラーセット
sql = sql & "ORDER BY test" '←…エラーが出るように追加
Set rs = db.Execute(sql)
If Err.Number <> 0 Then
Set rs = Nothing
Exit Function
End If
(中略)
exeSql1 = 0
End Function
'======本文==================
(中略)
tmp = exeSql1(sql)
If tmp <> 0 Then '戻り値がエラー(0以外)だったらエラー画面へ
Call goto_ErrPage() ←…エラーページに飛ぶ関数
End If
(後略)
-------------------------
どんなに関数:exeSql1で実行されるSQL文にエラーを含めてもエラーページに飛びません。
本文中で実行しているSQL文にエラーが含んでいるとエラーページに飛ぶのですが・・・。
こんな現象の原因などわかる方がいらっしゃいましたら教えてください!!!
よろしくお願いします。
お礼
run_awayさん、 回答ありがとうございました。 お礼が遅くなってすみませんでした。 参考URLをみまして↓のように対処しました。 ・エラーページに飛ぶ処理を入れている関数の始めにも On Error Resume me を加える。 テストにてエラーページに遷移することを確認しました。 どうもありがとうございました。