以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  登陆前判断外部数据源是否可用并弹窗提示,之后返回,登录过程中判断是否出现宕机,该如何编写代码  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=74465)

--  作者:wanlong1215
--  发布时间:2015/9/11 15:51:00
--  登陆前判断外部数据源是否可用并弹窗提示,之后返回,登录过程中判断是否出现宕机,该如何编写代码

1.登录前判断外部数据源是否可用,并弹窗提示,之后返回

在系统事件中写如下代码:

If e.Name = "ms" Then
    If Network.Ping("192.168.1.233") = False  Then 

                   \'这里如何弹窗,因为到这里foxtable自身的窗口还没有起来,不能调用

        Return ’这个返回貌似没有起作用,因为我在AfterOpenProject事件里写的窗口还是能弹出来
    End If
End If

 

2.登录过程中如果服务器宕机了,我想要发回信息,并做判断退出系统

NetworkAvailabilityChanged

在这个事件里能够判断出来么?我是连接服务器之后拔掉自己的网线没有判断出来,判断代码如下

If TryConnectHost("192.168.1.233") = False Then
    If Network.Ping("192.168.1.233") = False Then


--  作者:大红袍
--  发布时间:2015/9/11 16:07:00
--  

1、用Msgbox进行提示

 

MessageBox.Show("不能连接!", "重要提示",MessageBoxButtons.Ok,MessageBoxIcon.Error, 0, Windows.forms.MessageBoxOptions.ServiceNotification)

 

2、你要做一个计划任务,定时的执行代码,来测试是否能连接,不能连接,就弹出提示。

 

If TryConnectHost("192.168.1.233") = False Then
    If Network.Ping("192.168.1.233") = False Then