Al crear aplicaciones .NET con Visual Basic 2005 tenemos a nuestro alcance un recurso, el espacio de nombres My
, mediante el cual podemos resumir en unas pocas sentencias procesos que, en otros lenguajes como C# o C++, precisarían decenas o cientos de líneas de código. Ese espacio de nombres cuenta con una lista de objetos variable; según el tipo de proyecto que se desarrolle aparecerán unos u otros. En una aplicación cliente, basada en formularios Windows, siempre tendremos a nuestra disposición el objeto My.Computer
, que da acceso a los distintos dispositivos del ordenador: ratón, teclado, puertos de comunicación, registro de Windows, etc.
Mediante las propiedades y métodos de My.Computer.Network
, objeto que representa el acceso a red desde el ordenador en que se ejecuta la aplicación, es posible comprobar si existe o no conexión, hacer ping a un servidor remoto, enviar y descargar archivos, etc. Incluso existe la posibilidad de que nuestro programa reciba una notificación cada vez que el estado de la conexión a la red cambie.
Con un fragmento de código como el siguiente, por ejemplo, se comprueba si existe o no conexión a la red y, a continuación, si el hipotético servidor remoto de la organización está disponible, en cuyo caso se envía un supuesto archivo con información para su posterior consolidación:
If My.Computer.Network.IsAvailable = True Then ' Hay conexión a la red If My.Computer.Network.Ping("http://central.fcharte.com") = True Then ' Hay conexión con el servidor My.Computer.Network.UploadFile("C:\Datos.xls", _ "http://central.fcharte.com/reception","usuario","clave" End If End If
Torre de Babel - Francisco Charte Ojeda - Desde 1997 en la Web