以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  想做一个检测网络是否通断的程序。  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=88985)

--  作者:ycwk
--  发布时间:2016/8/12 18:41:00
--  想做一个检测网络是否通断的程序。
做了一个自助报障程序,想做一个检测网络是否通断的功能,使用以下代码

If Network.Ping("172.16.5.89") = False  Then        
  MessageBox.show("诊断出报障网络不通,请再次尝试打开本程序,如仍然显示此信息,请使用""****""钉钉群 或 拨打计算机中心电话报障","错误",MessageBoxButtons.ok,Messageboxicon.Information)
Else
 \'  MessageBox.show("可以正常报障")
End If 


但问题是这个程序放在 项目属性的 afteropenproject 事件里,只有登录后才会执行。  但是如果网络不通的话根本就登录不进去,怎么解决这个问题?

--  作者:cbt
--  发布时间:2016/8/13 8:21:00
--  

那放在更前一点  BeforeConnectOuterDataSource 这个事件里面

网络不同,就关闭


--  作者:ycwk
--  发布时间:2016/8/13 9:27:00
--  
不能在登录之前就检测吗?  直接关闭的话,不懂的人也不知道是咋回事啊!
--  作者:Hyphen
--  发布时间:2016/8/13 9:36:00
--  
BeforeOpenProject事件

If Network.Ping("172.16.5.89") = False  Then
    MessageBox.show("诊断出报障网络不通,请再次尝试打开本程序,如仍然显示此信息,请使用""****""钉钉群 或 拨打计算机中心电话报障","错误",MessageBoxButtons.ok,Messageboxicon.Information)
    e.Cancel = True
End If

--  作者:晕了快扶我
--  发布时间:2016/8/13 13:10:00
--  
 我最近也在解决这个问题,尤其是链接外部数据源的时候,启动的时候如果出现网络问题的话经常假死
我的解决思路是,凡是外部表的表结构通通不加载,在登录的窗口的登录这个按钮里做一个网络情况的判断,提示做在这里
供楼主参考
类似于这个,我把这个功能集成到登录里去了
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=88416&replyID=&skin=1
[此贴子已经被作者于2016/8/13 13:14:19编辑过]