Ping sous VB 2005 expresse

jon51 -  
 jon5167 -
Bonjour,
je suis en formation en bts IRIS et je doit faire un petit programme de supervision sous VB 2005 expresse. se petit programme doit principalement pingué des adresse IP et mettre un voyant rouge si l'appareil ne répond pas ou sinon un voyant vert si il répond.
pourriez vous m'aider?

merci d'avance.
Configuration: Windows XP
Internet Explorer 7.0

2 réponses

  1. ping
     
    If My.Computer.Network.Ping("www.google.fr") Then
    Label1.Text = "Résultat Ok"

    Else
    Label1.Text = "Résultat Ko"

    End If
    0
  2. jon5167
     
    bonjour merci pour votre réponse.
    j'ai juste une question a quoi correspond "label1"

    merci
    0