隅组词有哪些词语:VBScript的错误处理

在VBScript中，与错误处理相关的三者：on error resume next, on error goto 0, Err
1、最基本的错误提示dim i
i = 1/0
复制代码
结果：
Microsoft VBScript 运行时错误 错误 '800a000b'
被零除
/try.asp，行 3
2、防止系统的错误提示
使用on error resume next，可以放置系统提示错误，并且好像什么都没有发生一样，沉默的运行下去on error resume next
dim i
i = 1/0
复制代码
运行结果：
空
3、检查系统的错误
使用了on error resume next之后，如果出错Err对象中将放置最近一次出错的信息。Err对象重要的属性有三个：Number, Source, Description。分别是错误号，错误来源，错误描述。你能捕获的都是运行时错误，而且If Err then这样的写法等价于If Err.Number thenon error resume next
dim i
i = 1/0
execute "test"
Response.Write Err.Description
复制代码
运行结果：
类型不匹配
可以看到，提示的并不是被零除
4、让系统重新接管错误的处理
on error goto 0 ，使用这条语句会让系统不再沉默，一旦有错误发生就会提示错误，并结束脚本执行。on error resume next
dim i
i = 1/0
Response.Write "1"
on error goto 0
i = 1/0
Response.Write "2"
复制代码
运行结果：
1
Microsoft VBScript 运行时错误 错误 '800a000b'
被零除
/try.asp，行 7
可以看到，第一个1输出了，第二个没有。
5、on error resume next对子程序的影响
先看例子sub test()
dim i
i = 1/0
Response.Write "ok"
end sub
sub test1()
test
Response.Write "ok"
end sub
on error resume next
test1
复制代码
运行结果是：
空
两个ok都没有被打印。因为on error resume next是在最完成下达的，所以当调用的子程序中出了问题之后，那些子程序后面的部分无权处理，是由最完成的代码来完成，会直接从子程序中跳出。
6、on error resume next对子程序的影响（2）
还是看例子sub test()
on error resume next
dim i
i = 1/0
Response.Write " 3 "
end sub
sub test1()
test
Response.Write " 2 "
end sub
on error resume next
test1
Response.Write " 1 "
复制代码
执行的结果是：
3 2 1
可见在test()中用了on error resume next之后，这个子程序中这条语句之后的错误都将自己来处理，但是Err对象在退出了这个函数时并不会被清空，在test1和底层中仍然能够通过Err对象来知道test()的错误的发生。
7、对on error resume next行为的解释
a、执行了on error resume next之后，在这之后的所有代码产生的“未宽恕”的错误都不会中断代码的执行
b、如果没有执行on error resume next，所有“未宽恕”的错误都会导致程序的控制流程往上层流转，如果当前是最底层了则由系统打印错误。
c、“未宽恕”的错误导致流程往上层流转，如果上层的子程序是在on error resume next之后调用了这个产生错误的子函数的，则这个“未宽恕”的错误变成了“宽恕”的错误，不再影响程序的流程。
d、on error resume next的作用其实是局限于一个子程序中的，它只能保证使用了这个语句之后，在这个子程序内的程序流程不会受到运行时错误的影响。而它并不会影响上层和下层的错误处理逻辑。
8、on error goto 0的行为与on error resume next一致，其影响都是局限在子程序内部的。sub test()
on error goto 0
end sub
on error resume next
test
dim i
i = 1/0
复制代码
运行结果：
空
可见test()中的on error goto 0并不能把它的影响带到上层去。
9、Err对象的赋值
Err对象会在运行时错误发生的时候赋予新的值，旧的值会被舍弃。
Err对象不会受到函数调用的影响，它完全是全局的。
Err对象可以用Clear方法清空
任何时候调用on error resume next或者on error goto 0的时候，都会清空Err对象
10、小结
可见这个错误处理系统只能勉强用来获得运行时错误的信息，个人感觉很不方便，所以很难把程序的错误处理基于这样一个的怪异系统之上。
先把处理错误的程序写为一个（多个）函数。
然后在程序段前使用 On Error Resume Next 语句
接着是你的正常程序段
写完后在有可能出错的语句后面添加一条判断语句
If Err.Number > 0 Then 调用错误处理函数
如果不想再捕捉错误就用 On Error Goto 0
有一点要注意，如果调用错误处理程序后还想继续执行主程序下面的语句，必须在错误处理函数的最后使用 Err.Clear 语句把错误号清零（0 表示没有错误），以便于下一个判断语句的正确执行，否则 Err.Number 会永远大于 0 的。如果想更具不同的错误调用不同的错误出来函数，必须用 Err.Number = 错误号来判断。如果不知道错误号，可以人为让这条语句出错，然后看 Err.Number 的值就可以了。
如果要执行的语句是一个函数，必须在函数的前面加上 On Error Resume next 语句，主程序的这条语句不会影响到它调用的函数的。