angelink 发表于 2010-8-17 22:18:59

帮忙修改一下出错处理,谢谢。

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

看了半天,这个是程序出错后然后弹出错误信息,如何不让他弹出信息,而后重新运行程序呢?

G,man。 发表于 2010-8-18 14:25:29

是不是版本问题?
页: [1]
查看完整版本: 帮忙修改一下出错处理,谢谢。