exception - 经典 ASP 错误“80020009”发生异常

Question

在我正在修复的站点的代码的第 5 行，我从经典 ASP 中得到一个异常错误。下面的 ** 行是第 5 行。看起来这个功能在站点的其他页面上使用，虽然我不太清楚为什么。我试过只删除代码，但由于它在其他地方使用过，它一定很重要，所以也许我不应该尝试删除它....

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

以下是使用 where 的示例AE：response.write AE(rs("ArticleTitle"))

提前感谢您能给我的任何帮助！

Answer 1

这可能意味着数据库中的字段为 Null。您可以在有问题的行之前添加此行：

If isNull( myString ) Then Exit Function

如果这不起作用，您还可以尝试将有问题的行更改为：

If "" & myString <> "" Then

Answer 2

如果您尝试访问没有记录的记录集中的记录（即，如果您在访问字段之前忘记检查 eof），也会出现此错误。

Answer 3

在替换之前检查，`这在字符串中是否存在

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

Answer 4

使用 ASCII 字符代码而不是单引号：

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