Foxtable(狐表)用户栏目专家坐堂 → 由于需要同时监测几十个别人的网站是否能打开,想弄一个网站监测工具,


  共有3630人关注过本帖树形打印复制链接

主题:由于需要同时监测几十个别人的网站是否能打开,想弄一个网站监测工具,

帅哥哟,离线,有人找我吗?
zhenghangbo
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:480 积分:4612 威望:0 精华:0 注册:2018/2/7 14:30:00
由于需要同时监测几十个别人的网站是否能打开,想弄一个网站监测工具,  发帖心情 Post By:2021/3/6 17:56:00 [只看该作者]

由于需要同时监测几十个“别人”的网站、以及各自网站下的多个链接是否能打开,想弄一个网站监测工具,怎么实现好?
If TryConnectHost("www.egridsoft.com") Then
    If 
Network.Ping("www.egridsoft.com") Then
        
Messagebox.Show("可以访问易表主页")
    End If
End If
这里的TryConnectHost跟Network.Ping只能是域名或者ip,可是很多网站及链接都是“ip+端口号”的要怎么检测?

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111414 积分:567140 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/3/7 20:12:00 [只看该作者]

换种方式

Dim hc As New HttpClient("http://www.abc.com:10000/")
Dim ret As String = hc.GetData(True)
If ret = "" Then
    Output.Show( hc.rCookies("Error"))
Else
    Output.Show( "可以连接")
End If

 回到顶部