在VB6里使用SEH(结构化异常处理)

其实写这个的动力来自于.....现在这个单子出了灵异事件,运行后随机出现非法操作....

有时几分钟就挂,有时几小时都没事....郁闷的是,怎么找都找不到原因......我那汗哪....

要知道我是在客户现场.......如利剑般的目光刺得我....当然,现在客户睡觉去了,我一个人在

办公室里折腾......四点了哇T_T

咳咳,说正事.

这程序,我发现出现错误时仍然是正常执行的,只要别去点那个"确定"或"取消..

于是就想到了WS的缓兵之计-------SEH......咳咳....不是我不负责,我实在是一时找不出来出

错的原因,没办法了.......代码有1W多行啊.......我头都晕了.

折腾了好久,终于折腾出来了.参考了老罗的<>里的

相关章节,还算顺利.(说句题外话.....微软的MASM,把汇编整得像VB一样...我真服了- -!)

代码其实很简单.....和子类化差不多.只是要知道那样写,还真让我查了一些资料.反正现

在是整出来了....大家拿去用呗.我也可以暂时顶过此关,回去慢慢查代码里的原因....

调用就一个函数:

SetSEH True / False

具体的处理过程在MyExceptionFunc里,注释比较多,自己发挥吧.......

另外要注意一点:在IDE里运行工程时捕捉不到....不知道为啥,先不管了,用着再说- -!

好了....准备睡觉了....我们的口号是:

死也要死得漂亮点!哇哈哈~~~当然...最好是万岁...

代码在这里下载:

下载文件 点击下载此文件

BY 嗷嗷叫的老马

紫水晶工作室
http://www.m5home.com/
2009-07-14 (这日期还真是....- -!)

评论: 3 | 引用: 0 | 查看次数: 1687
admin
admin[2009-07-15 01:06 AM | ]
引用来自 苏洋 引用来自 苏洋
老马写VB CODE不写行号的么...
建议加一个邮件提示..或我给你改个算了..

行号?什么行号?
苏洋
苏洋[2009-07-14 02:32 PM | ]
老马写VB CODE不写行号的么...
建议加一个邮件提示..或我给你改个算了..
苏洋
苏洋[2009-07-14 02:21 PM | ]
沙老马的发...