求助:有没有自动关闭系统错误提示或不显示错误提示的办法
我做了个小程序,里面的计时器会每分钟读取远程数据一次,存入本地数据库。因为我这里网络用的人很多,所以不太稳定,有时会出现错误提示“错误信息:OLE IDispatch 异常代码0出自msml3.dll:系统未找到指定资源。”,这时候如果点“忽略”,程序就能继续运行,但是如果没有人工干预,错误提示会一直显示,程序也就中断了。有没有什么设置或者办法能让系统错误提示不显示(或者像messagebox函数一样能设置关闭时间),这样程序就可以在下一分钟重新联系远端并读取数据了。
现在用的就是on error,不知道是格式不对还是什么原因,有时能行,有时还是出现错误提示(所以就想看看有没有其他办法)。请版主帮忙看看是什么原因,感谢。
下面这个放在“读取数据”表单的计时器里了
ON ERROR DO errHandler WITH ;
ERROR( ), MESSAGE( ), MESSAGE(1), PROGRAM( ), LINENO( )
&&后面跟着远程数据读取程序
下面这段代码是放在主程序里了
PROCEDURE errHandler
PARAMETER merror, mess, mess1, mprog, mlineno
PUBLIC errHandler,读取数据
&&错误信息保存到专门建的一个表里,通过这个表可以看到,确实有几次错误出现后没有影响程序继续读取数据,但是也有两次系统的错误提示又出现了,读取数据随之停止。
&&然后重启计时器(读取数据.timer1.enabled=.t.)
ENDPROC