|
Func MyErrFunc()
Msgbox(0,"AutoItCOM Test","We intercepted a COM Error !"&@CRLF&@CRLF & _
"err.description is: " &@TAB&$oMyError.description&@CRLF& _
"err.windescription:" &@TAB&$oMyError.windescription&@CRLF& _
"err.number is: " &@TAB&hex($oMyError.number,8)&@CRLF& _
"err.lastdllerror is: "&@TAB&$oMyError.lastdllerror&@CRLF& _
"err.scriptline is: " &@TAB&$oMyError.scriptline& @CRLF& _
"err.source is: " &@TAB&$oMyError.source&@CRLF& _
"err.helpfile is: " &@TAB&$oMyError.helpfile&@CRLF& _
"err.helpcontext is: " &@TAB&$oMyError.helpcontext)
Local $err = $oMyError.number
If $err = 0 Then $err = -1
SetError($err)
; to check for after this function returns
Endfunc
看了半天,这个是程序出错后然后弹出错误信息,如何不让他弹出信息,而后重新运行程序呢? |
|