以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  由于需要同时监测几十个别人的网站是否能打开，想弄一个网站监测工具,  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=161118)

--  作者：zhenghangbo --  发布时间：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+端口号”的要怎么检测？

--  作者：有点蓝 --  发布时间：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