asp-classic - 在经典 ASP 中使用“on error resume next”，以及如何处理错误

Question

大家好，我想问一个关于on error resume next

假设我们有一个循环来浏览记录集，例如：

Do while not rs.EOF
query = "UPDATE ...."    
conn.execute(query)    
rs.movenext
loop

我想确保UPDATE一切顺利，并且我想检查是否存在一些问题，因此我在代码中添加了调试功能，例如：

Do while not rs.EOF
query = "UPDATE ...."

on error resume next

conn.execute(query) 

If Err.Number <> 0 Then
   Response.write(Err.Number)
   response.write("<br>")
   response.write(Err.description)
   response.write("<br>")
   response.write(query)
   response.write("<br><br>")
end if

on error goto 0

rs.movenext
loop

问题是：在循环期间，如果遇到错误，下一个循环是否会出现错误（并因此再次触发错误块）？还是on error goto 0会清除 Err 对象？换句话说，它会起到错误处理的作用吗？

Answer 1

VBScript 重置错误goto 0：

on error resume next
i = 1 / 0
WScript.echo( err.number ) '' prints 11 (div by 0)
on error goto 0
WScript.echo( err.number ) '' prints 0 (no error)

还有显式的err.clear().

Answer 2

要使用的正确代码是

Err.Clear

我已经用以下代码对其进行了测试

<%on error resume next
   response.write (p(10))
   Response.write(Err.Number)
   response.write("<br>")
   response.write(Err.description)
   response.write("<br>")
   Err.Clear
   Response.write(Err.Number)
   response.write("<br>")
   response.write(Err.description)
   response.write("<br>")



%>

您可以在下面看到正确的响应，这表明错误正在清除

*13

类型不匹配

0*

Answer 3

on error resume next语句只忽略当前行错误并将程序控制发送到下一行。

on error goto 0只是停止on error resume next的工作。就是这样。

<%
on error resume next
response.write(1/0)
if err.number <> 0 then
response.write("<b>" & "err= "&"</b>")
response.write(err.description)
response.write("<b>" & " err number= "&"</b>" )
response.write(err.number&"</br>")
end if
'after this statement ASP will no longer resume the error and program terminate at here if error occur after this line
on error goto 0
response.write(6/0)
%>