Come eseguire il ping con Visual Basic

September 14

Utilizzando ping in un'applicazione di rete aiuta a errori di connessione limite e gli errori. Ping è un processo in cui il computer invia un segnale ad un altro computer. Questo computer può essere un server su un dominio completamente separato, o può essere un computer sulla rete locale. L'utilizzo della classe ping in Visual Basic consente all'applicazione di sapere se il computer è presente. Se il ping non è in grado di trovare il computer specificato, il programmatore può utilizzare i codici di errore per visualizzare un messaggio di avviso per l'utente.

istruzione

1 Aprire un nuovo file di modulo. Nel suo studio di lavoro visivo, fare clic destro sul nome del progetto nella casella degli strumenti Esplora soluzioni. Selezionare Aggiungi modulo. Una nuova forma appare nell'area di lavoro.

2 Impostare l'indirizzo IP o il nome di dominio del computer che si desidera eseguire il ping. Il seguente codice assegna una variabile con un indirizzo IP impostato. La variabile timeout dice al computer quando smettere di ricerca di una risposta dalla macchina remota.

Dim MyIP As String = "192.168.0.1"
TimeOutValue Dim As Integer = 120

3 Allocare memoria per la classe di ping. Prima di utilizzare la classe ping, ha bisogno di essere chiamato e salvato in una variabile.

Dim pingComputer Come Ping = Nuovo Ping ()

4 Ping il computer. Il codice seguente utilizza il metodo Send per il ping dell'indirizzo IP indicato al punto 2.

Dim theReply Come PingReply = pingComputer.Send (MyIP)

5 Verificare che il comando ha avuto successo. Una risposta di successo viene restituito alla proprietà di stato nella variabile theReply. Il codice di seguito viene avvolto intorno al codice che indica l'applicazione che cosa fare se il computer della rete ha risposto.

Se theReply.Status = IPStatus.Success

Finisci se

6 Visualizzare la risposta. Il codice qui sotto mostra la risposta alla console solo se il ping ha avuto successo.

Se theReply.Status = IPStatus.Success

Console.WriteLine ( "IP: {0}", theReply.Address.ToString ())
Console.WriteLine ( "Tempo di viaggio: {0}", theReply.RoundtripTime)

Finisci se