工作心得网

工作心得精彩分享
代码积累持续学习

在代理里捕捉错误,并输出错误提示

Use "SystemErrhandle"

On Error Goto endErrhandle


 Exit Sub
endErrhandle:
 NewErr.LogToFile=0
 NewErr.ErrModule="XXXX.nsf中 XXXXX代理(XXXXXf方法)错误行:" +NewErr.SysErrLine
 Call NewErr.OutPutErrMsg("")

没有使用script库的捕捉错误方法

On Error GoTo Errhandle
........
........
Errhandle:    
   MessageBox "Error" & Str(Err) & ": " & Error$

我们的缺点麻烦您能提出,谢谢支持!

关于站长