以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  网络掉线了弹出提示  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=175367)
--  作者：青丘狐
--  发布时间：2022/3/2 13:19:00
--  网络掉线了弹出提示
用花生壳远程，如掉线了弹出提示，请问怎么写代码？
--  作者：有点蓝
--  发布时间：2022/3/2 13:37:00
--  
参考：http://www.foxtable.com/webhelp/topics/2959.htm
--  作者：青丘狐
--  发布时间：2022/3/2 16:25:00
--  

Dim s As String = TryConnectHost("XXXX.VVVV.net")
If Connections.TryConnect(s) = False Then
    MessageBox.Show("数据源无法连通!")
End If
If Connections.TryConnect(s) = True  Then
    MessageBox.Show("恭喜!!数据连接成功!")
End If

 

 

是通的也提示数据源无法连通!
--  作者：有点蓝
--  发布时间：2022/3/2 16:45:00
--  
可能是花生壳域名有什么特殊处理，试试ping