TryConnectHost
用于判断服务器的地址是否可以解析。
前面提到用Network的Ping方法判断指定的地址服务器是否
可以连通,但是有缺陷,在网络不通的情况下,会出现错误提示。
为了提高判断速度,并避免出现错误提示,我们可以
用TryConnectHost先判断服务器地址是否可以解析,然后再用Ping测试服务器是否可以连接。
示例一
If
TryConnectHost("www.egridsoft.com")
Then
If
Network.Ping("www.egridsoft.com")
Then
Messagebox.Show("可以访问易表主页")
End If
End If
示例二
对于一般的管理系统,网络问题出在服务器端的比较少,一般问题都出在客户端。
在服务器端稳定的情况下,为了提高判断速度,可以省去用ping判断的这一步,例如:
If
TryConnectHost("www.egridsoft.com")
Then
Messagebox.Show("可以访问易表主页")
End If