web-dev-qa-db-ja.com

クラシックASPエラー '80020009'例外が発生しました

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

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

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

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

exceptionasp-classic
5
Jamie

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

If isNull( myString ) Then Exit Function

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

If "" & myString <> "" Then
9
Sander_P

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

1
mike nelson

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

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