Condividi tramite


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

Riferimenti

Oggetto My.Computer.Network

Membri dell'oggetto My.Computer.Network

Metodo My.Computer.Network.Ping