vbs 异常

来源:互联网 发布:七天网络登录查分入口 编辑:程序博客网 时间:2024/06/04 19:28
On Error Resume NextErr.ClearSet myObj = CreateObject("SomeKindOfClassThatDoesNotExist")If Err.Number <> 0 Then WScript.Echo "Error: " & Err.Number WScript.Echo "Error (Hex): " & Hex(Err.Number) WScript.Echo "Source: " & Err.Source WScript.Echo "Description: " & Err.Description Err.ClearEnd IfOn Error Goto 0WScript.Echo "This text will always print."
0 0