exception - 従来のASPエラー「80020009」例外が発生しました

Question

修正しているサイトのコードの5行目で、従来のASPから例外エラーが発生します。下の**行は5行目です。理由はよくわかりませんが、この関数はサイトの他のページで使用されているようです。コードを削除してみましたが、他の場所で使用されているので重要なので、削除してはいけないかもしれません。

Private Function AE(myString)
**If myString <> "" then** 
AE = Replace(myString,"`","'")
End If
End Function

AE使用される場所の例を次に示します。response.write AE(rs("ArticleTitle"))

あなたが私に与えることができるどんな助けにも前もって感謝します！

score 10 · Accepted Answer

これはおそらく、データベースのフィールドがNullであることを意味します。問題のある行の前に次の行を追加できます。

If isNull( myString ) Then Exit Function

それがうまくいかない場合は、問題のある行を次のように変更してみることもできます。

If "" & myString <> "" Then

score 1 · Accepted Answer

このエラーは、レコードがないレコードセットのレコードにアクセスしようとした場合（つまり、フィールドにアクセスする前にeofを確認し忘れた場合）にも発生します。

score 0 · Accepted Answer

置換する前に確認してください。`これは文字列に存在しますか？

if instr(mystring, "`") then
'your code
else
'your code
end if

score -2 · Accepted Answer

一重引用符の代わりにASCII文字コードを使用します。

AE = Replace(myString,"`",chr(39))

4 に答える 4