我被赋予了在VB.NET中创建一个小应用程序的任务,用户可以在文本字段中输入端口号,并检查机器的IP地址以查看该端口是否被阻止。我确实使用TCPListener开发了一个方法,但似乎它不能正常工作。目前我有:
Dim tcpList As TcpListener = New TcpListener(System.Net.IPAddress.Parse(Host), PortNumber)
tcpList.Start()
tcpList.Stop()
Return True
然而,如果某些内容已经在监听,那么这似乎表明该端口已被阻止。任何人都可以想到一种正确的方法吗?
谢谢!
答案 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