如何使用VB.NET检查被阻止的端口

时间:2015-02-19 11:10:04

标签: vb.net winforms network-programming ports

我被赋予了在VB.NET中创建一个小应用程序的任务,用户可以在文本字段中输入端口号,并检查机器的IP地址以查看该端口是否被阻止。我确实使用TCPListener开发了一个方法,但似乎它不能正常工作。目前我有:

          Dim tcpList As TcpListener = New TcpListener(System.Net.IPAddress.Parse(Host), PortNumber)
            tcpList.Start()
            tcpList.Stop()
            Return True

然而,如果某些内容已经在监听,那么这似乎表明该端口已被阻止。任何人都可以想到一种正确的方法吗?

谢谢!

1 个答案:

答案 0 :(得分:1)

试试这个:

If My.Computer.Network.Ping("198.01.01.01") Then
  MsgBox("Server pinged successfully.")
Else
  MsgBox("Ping request timed out.")
End If

或者

If My.Computer.Network.Ping("www.cohowinery.com", 1000) Then
  MsgBox("Server pinged successfully.")
Else
  MsgBox("Ping request timed out.")
End If

另见:https://msdn.microsoft.com/en-us/library/s9xkzk4s(v=vs.90).aspx