Ping hacia un equipo desde VB.Net

 Para saber si un determinado equipo dentro de una intranet está en línea, mediante la línea de comandos de Microsoft Windows usamos el comando "ping" y así podemos determinar si está respondiendo o no. Pero, ¿y si quisieramos saber esto mismo desde un programa en VB.Net?
 Les comparto un código fuente muy sencillo basado en la misma cuestión surgida en http://stackoverflow.com/questions/13401797/test-nework-latency-using-vb-net, sin embargo a pesar de su simplicidad créanme que resuelve un gran problema, espero les sea de mucha utilidad.

Publicidad

Public Function isAliveServer(IP As String) As Boolean

  Try
     Return My.Computer.Network.Ping(IP.Trim)
  Catch exp As Exception
     Return False
  End Try
    
End Function

 ¿Te gustó este post?, entonces si lo deseas puedes apoyarnos para continuar con nuestra labor, gracias.

---