Come Ping con Visual Basic

Utilizzo di ping in un'applicazione di rete aiuta a errori di connessione limiti ed 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 separata , oppure 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 . Istruzioni
1

Aprire un nuovo file di forma . Nell'area di lavoro di Visual Studio , fare clic destro sul nome del progetto nella casella degli strumenti Esplora soluzioni. Selezionare Aggiungi modulo . Una nuova forma appare nel vostro spazio di lavoro .
2

Impostare l'indirizzo IP o il nome di dominio del computer che si desidera eseguire il ping . Il codice qui sotto alloca una variabile con un indirizzo IP impostato . La variabile timeout dice al computer quando fermarsi alla ricerca di una risposta dalla macchina remota .

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

allocare memoria per la classe di ping. Prima di utilizzare la classe Ping, ha bisogno di essere chiamati e salvati in una variabile .

Dim pingComputer Come Ping = New Ping ( ) economici 4

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

Dim theReply Come PingReply = pingComputer.Send ( MyIP ) economici

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

TheReply.Status = IPStatus.Success

End If

6

Visualizza la risposta . Il codice qui sotto mostra la risposta alla console solo se il ping è riuscita

theReply.Status = IPStatus.Success

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

End If

• Come fare programmazione di database con Visual Basic 
• Come leggere porte seriali utilizzando Visual Basic