Procedura: determinare la disponibilità di un computer remoto in Visual Basic
Aggiornamento: novembre 2007
È possibile utilizzare Metodo My.Computer.Network.Ping per determinare la disponibilità di un computer remoto o di un host. Il server può essere specificato dall'URL, dal nome del computer o dall'indirizzo IP. Quando si specifica un URL, non includere http://.
Il metodo Ping non è infallibile nella determinazione della disponibilità di un computer remoto: la porta del ping sulla macchina di destinazione può essere spenta oppure la richiesta di ping può essere bloccata da un firewall o da un router.
Nota: |
---|
Le opzioni disponibili nelle finestre di dialogo, nonché i nomi e le posizioni dei comandi di menu, possono non corrispondere a quanto descritto nella Guida poiché dipendono dalle impostazioni attive o dall'edizione in uso. Questo argomento della Guida è stato creato basandosi su Impostazioni generali per lo sviluppo. Per modificare le impostazioni, scegliere Importa/esporta impostazioni dal menu Strumenti. Per ulteriori informazioni, vedere Impostazioni di Visual Studio. |
Per eseguire il ping di un server
Determinare se il metodo Ping restituisce True. In questo esempio viene stabilito se è possibile eseguire il ping sul server determinando se il metodo Ping ha restituito True. Sostituire 198.01.01.01 con l'indirizzo IP, l'URL o il nome del computer del server in cui eseguire il ping
If My.Computer.Network.Ping("198.01.01.01") Then MsgBox("Server pinged successfully.") Else MsgBox("Ping request timed out.") End If
Per eseguire il ping in un server e specificare il timeout
Determinare se il metodo Ping restituisce True, specificando l'intervallo di timeout in millisecondi. Se il timeout non viene specificato, per impostazione predefinita viene utilizzato 500. In questo esempio viene stabilito se è possibile eseguire il ping nel server determinando se il metodo Ping ha restituito True e specificando un intervallo di timeout di 1000 millisecondi. Sostituire www.cohowinery.com con l'indirizzo IP, l'URL o il nome del computer del server in cui eseguire il ping.
If My.Computer.Network.Ping("www.cohowinery.com", 1000) Then MsgBox("Server pinged successfully.") Else MsgBox("Ping request timed out.") End If
Vedere anche
Attività
Procedura: controllare lo stato di connessione in Visual Basic