如何：在 Visual Basic 中确定远程计算机是否可用

项目
08/18/2008

更新：2007 年 11 月

可以使用 My.Computer.Network.Ping 方法来确定远程计算机或主机是否可用。服务器可以通过 URL、计算机名称或 IP 地址来指定。指定 URL 时请不要包含 http://。

Ping 方法不是一个用于确定远程计算机可用性的故障保险方法：目标计算机上的 ping 端口可能已关闭，或者 ping 请求可能被防火墙或路由器阻止。

说明：
对话框中的可用选项以及显示的菜单命令的名称和位置可能会与“帮助”中的描述不同，具体取决于您的当前设置或版本。此帮助页是根据“常规开发设置”而编写的。若要更改设置，请在“工具”菜单上选择“导入和导出设置”。有关更多信息，请参见 Visual Studio 设置。

Ping 服务器

确定 Ping 方法是否返回 True。此示例确定 Ping 方法是否返回了 True，由此来报告是否能够 ping 至该服务器。将 198.01.01.01 替换为要 ping 的服务器的 IP 地址、URL 或计算机名称。
```
If My.Computer.Network.Ping("198.01.01.01") Then
  MsgBox("Server pinged successfully.")
Else
  MsgBox("Ping request timed out.")
End If
```

Ping 服务器并指定超时

确定 Ping 方法是否返回 True，同时指定超时间隔（以毫秒为单位）。如果未指定超时，则使用 500 作为默认值。此示例确定 Ping 方法是否返回了 True，由此来报告是否能够 ping 至该服务器，此示例还指定 1000 毫秒的超时间隔。将 www.cohowinery.com 替换为要 ping 的服务器的 IP 地址、URL 或计算机名称。
```
If My.Computer.Network.Ping("www.cohowinery.com", 1000) Then
  MsgBox("Server pinged successfully.")
Else
  MsgBox("Ping request timed out.")
End If
```

请参见

任务

如何：在 Visual Basic 中检查连接状态

参考

My.Computer.Network 对象

My.Computer.Network 对象成员

My.Computer.Network.Ping 方法