El blog de Joaquin

2005-02-27

servicio de windows

Hola a todos,
he desarrollado un servicio de windows el cual aceptaba varios parámetros a través de sus parámetros de inicio.Ahora necesito incrementar el número de parámetros y había pensado en crear
un archivo xml con dichos datos.
El problema es que en un servicio de windows no existe la propiedad Application.StarthPath y no sé como indicarle que busque el archivo de configuración en la misma carpeta que el ejecutable.

¿Alguna idea?

Imports System.Reflection
ubicacion = Assembly.GetExecutingAssembly().Location

Ping en VB NET

http://www.elguille.info/colabora/puntoNET/ar_PingVBNET.htm

Patron Singleton y formularios

Tengo un formulario MDI en el que cargo una serie de formularios hijos, pero no quiero que un formulario hijo se abra mas de una vez, como puedo controlar la cantidad de veces que se abre un formulario

Public Class Form1
  ..........
  .........
  ........
  Private Shared _instance As Form1
  ........
  Public Shared ReadOnly Property Instance As Form1
      Get
          If _instance Is Nothing OrElse _instance.IsDisposed() Then
              _instance = New Form1()
          End If

          Return _instance
      End Get
  End Property
  .............
  .............
  .............
End Class

Y de ahi en adelante, en todo tu proyecto, siempre usaras Form1.Instance y siempre estaras usando una unica instancia disponible.

SQL iniciar el servidor remoto

Para iniciar el servicio sql server, en un servidor SQL remoto ..
Utiliza la clase ServiceController (debes agregar una referencia a System.ServiceProcess.dll):

Dim sqlserver As New ServiceProcess.ServiceController("mssqlserver","servidor")
sqlserver.Stop()
sqlserver.Start()

cursor en modo Hourglass

Para poner el cursor en modo Hourglass y después devolverlo a su estado inicial,se hace de la siguiente manera

MiForm.Cursor = Cursors.Waitcursor
MiForm.Cursor = Cursors.Default

resolución del usuario en su pantalla

¿De que manera se puede saber la resolución que tiene el usuario en su pantalla?
puedes obtenerla mediante:

Screen.PrimaryScreen.Bounds.Width
Screen.PrimaryScreen.Bounds.Height

o bien

SystemInformation.VirtualScreen.Width
SystemInformation.VirtualScreen.Height

obtener el nombre del servidor

Para obtener el nombre del servidor de la maquina donde esta instalada la aplicación Prueba alguna de estas alternativas:

MessageBox.Show(SystemInformation.ComputerName())
MessageBox.Show(System.Net.Dns.GetHostName)
MessageBox.Show(System.Environment.MachineName)

NET y archivos en ZIP

Librería escrita en C#, que comprime/descomprime archivos en ZIP,
es open source, incluye el código fuente.
http://www.icsharpcode.net/OpenSource/SharpZipLib/Default.aspx

IP del Ordenador

Para saber la IP de tu ordenador solo tienes que hacer clic en la siguiente pagina http://checkip.dyndns.org/ es muy útil cuando sales a Internet a través de un router y necesitas saber la dirección IP del router.

La Web de esta dirección te contestará algo así como "Current IP Address: 123.45.67.89" (codificado en html). A continuación analizas el string devuelto y sacas de dentro la dirección (puedes usar la clase RegEx para sacar la IP de dentro del string sin preocuparte del formato exacto)

2005-02-24

Una página de buscadores

He actualizado mi página sobre buscadores
http://jms32.eresmas.net/buscador/busca01.html