So erstellen einen Port-Test in Visual Basic

Erstellen eines Port-Tests in Visual Basic (VB) ist nicht kompliziert--in VB können Sie den "System.net.Sockets..::"-Namespace, der bietet Ihnen eine Schnittstelle im Netzwerk von einem Computer gesteuert. Verwenden Sie die Klasse "TcpClient" zum Herstellen einer jeden Port Sie testen möchten und zeigt an, ob ein Port geöffnet oder geschlossen. Dieser Prozeß ist nützlich, wenn viele Ports in einen Computer zu bestimmen, welche verfügbar sind, testen möchten.

Anweisungen

1 Starten Sie Microsoft Visual Studio zu, klicken Sie auf "Neue Neuregelung" und erweitern Sie "Visual Basic" unter "Installierte Vorlagen". Doppelklicken Sie auf "Console Application" erstellen Sie ein neues Konsolenprojekt.

2 Fügen Sie den folgenden Code oben "Modul Modul1" Namespaces deklarieren, die Sie in Ihrem Projekt verwenden werden:

System.net.Sockets..:: importiertSystem.Net importiertSystem.Threading importiertImports System.Text

3 Fügen Sie den folgenden Code unter "Sub Main()" erstellen Sie eine Variable um eine Zählervariable zu definieren, ab Hafen und den End-Port, die Sie testen möchten:

Dim StartPrt As Integer = 75

Dim endPrt As Integer = 90 Dim lpLng As Long4

Kopieren Sie und fügen Sie den folgenden Code zum Erstellen einer Schleife und eine Meldung mit dem Status eines jeden Port:

For lpLng = startPrt To endPrt Dim clientTcp As New TcpClient() Try clientTcp.Connect("1.1.1.1", lpLng) Console.WriteLine("Port " + lpLng.ToString() + " is ready") clientTcp.Close() Catch ex As SocketException Console.WriteLine("Port " + lpLng.ToString() + " is Closed" + ex.Message) End Try Next Console.ReadLine()5

Bearbeiten "1.1.1.1" String und Typ der IP-Adresse des Hosts, die Sie testen möchten. Drücken Sie die Taste "F5" führen Sie das Programm und starten jeden Port testen.