Comprovar conexion en Visual Basic
Muchas veces nos ocurre que necesitamos añadir a nuestra aplicación un aparta donde podamos ver si un aplicación se ejecuta en un ordenador remoto o no.
Viene bien cuando independientemente de nuestra aplicación necesitamos comprobar si además de nuestra aplicación esta ejecutándose una aplicación determinada, claro esta sabiendo el puerto en el que dicha aplicación esta escuchando.
El codigo es simple.
Imports System.Net.Sockets
Dim xClient = New TcpClient()
Try
xClient.Connect("Host", Puerto)
xClient.Close()
MsgBox ("Conectado")
Catch
MsgBox ("Desconectado")
End Try
Con este código hecho en Visual Basic .NET podremos ver un mensaje si esta o no la aplicación escuchando en el puerto que indicamos.
La explicación es simple.
Donde pone host indicaremos la dirección IP donde se encuentra la aplicación que se supone esta a la escucha para comprobar su estado.
Donde pone Puerto indicaremos el puerto por el que la aplicación esta escuchando.
Los MsgBox() son para que depende de la situación de la aplicación nos muestre un mensaje indicando si la aplicación esta conectada o no.
Espero que os sirva de ayuda.

