crear un servicio URGENTE

entonces ¿que es lo que quieres saber?
¿cómo crear un servicio o cómo comparar dos fechas?

Las fechas se pueden comparar de la forma normal <, > Otra cosa es que quieras compararla con un periodo de tiempo.
Aquí tienes un ejemplo de timeSpan
http://www.panoramabox.com/GoPub.aspx?IdObj83


Nos vemos.
Guillermo
Microsoft VB MVP desde 1997
Te invito a mi sitio dedicado al VB y más...
http://www.elguille.info/
http://www.mundoprogramacion.com/
(puede que el correo usado sea anti-spam)


"José Luis" wrote in message
news:

hola
Tengo un problema quiero crear un servicio, que se ejecute al prender la
maquina que, como funcion es que este comprando una fecha obtenida de una
bd's con la fecha actual del sistema. Y que me despliegue un mensaje.Ya
cree un servicio que encontre en el
MSDN
http://msdn.microsoft.com/library/s...cation.asp

Ya lo hice... si funciona pero quiero comparar las fechas..
Adios

lo que quiero sber es como mandar mensajes en el servicio que cree:
a qui esta el codigo:

Imports System.ServiceProcess

Public Class MyNewService
Inherits System.ServiceProcess.ServiceBase
'mando a llamar un formulario
Public objMensaje As New mensage

Protected Overrides Sub OnStart(ByVal args() As String)
' Add code here to start your service. This method should set things
' in motion so your service can do its work.
'Para definir qué debe ocurrir al iniciar el servicio

EventLog1.WriteEntry("In OnStart")
Dim FechaActual As Date = Date.Today
Dim FechaCalculo As Date = "16/02/2005"
If DateDiff(DateInterval.Day, FechaCalculo, FechaActual) <= 4 Then
objMensaje.ShowDialog()
Else
objMensaje.ShowDialog()
End If

End Sub

Protected Overrides Sub OnStop()
' Add code here to perform any tear-down necessary to stop your
service.
'Para definir qué debe ocurrir al detener el servicio
EventLog1.WriteEntry("In OnStop.")

End Sub


End Class
Donde puedo leer mas, o algun codigo de ejmplo se los agradeceria

"Guillermo 'guille'" escribió:

entonces ¿que es lo que quieres saber?
¿cómo crear un servicio o cómo comparar dos fechas?

Las fechas se pueden comparar de la forma normal <, > > Otra cosa es que quieras compararla con un periodo de tiempo.
Aquí tienes un ejemplo de timeSpan
http://www.panoramabox.com/GoPub.aspx?IdObj83


Nos vemos.
Guillermo
Microsoft VB MVP desde 1997
Te invito a mi sitio dedicado al VB y más...
http://www.elguille.info/
http://www.mundoprogramacion.com/
(puede que el correo usado sea anti-spam)


"José Luis" wrote in message
news:
> hola
> Tengo un problema quiero crear un servicio, que se ejecute al prender la
> maquina que, como funcion es que este comprando una fecha obtenida de una
> bd's con la fecha actual del sistema. Y que me despliegue un mensaje.Ya
> cree un servicio que encontre en el
> MSDN
> http://msdn.microsoft.com/library/s...cation.asp
>
> Ya lo hice... si funciona pero quiero comparar las fechas..
> Adios
>
>

el problema de los servicios de windows es que de forma predeterminada no
permiten interactuar con el escritorio, es decir, no pueden mostrar
aplicaciones que interactuen con el usuario.
Para que pueda hacerlo, configura el servicio (desde el panel Servicios) para
que pueda interactuar con el escritorio.


Nos vemos.
Guillermo
Microsoft VB MVP desde 1997
Te invito a mi sitio dedicado al VB y más...
http://www.elguille.info/
http://www.mundoprogramacion.com/
(puede que el correo usado sea anti-spam)


"José Luis" wrote in message
news:

lo que quiero sber es como mandar mensajes en el servicio que cree:
a qui esta el codigo:

Imports System.ServiceProcess

Public Class MyNewService
Inherits System.ServiceProcess.ServiceBase
'mando a llamar un formulario
Public objMensaje As New mensage

Protected Overrides Sub OnStart(ByVal args() As String)
' Add code here to start your service. This method should set things
' in motion so your service can do its work.
'Para definir qué debe ocurrir al iniciar el servicio

EventLog1.WriteEntry("In OnStart")
Dim FechaActual As Date = Date.Today
Dim FechaCalculo As Date = "16/02/2005"
If DateDiff(DateInterval.Day, FechaCalculo, FechaActual) <= 4 Then
objMensaje.ShowDialog()
Else
objMensaje.ShowDialog()
End If

End Sub

Protected Overrides Sub OnStop()
' Add code here to perform any tear-down necessary to stop your
service.
'Para definir qué debe ocurrir al detener el servicio
EventLog1.WriteEntry("In OnStop.")

End Sub


End Class
Donde puedo leer mas, o algun codigo de ejmplo se los agradeceria

"Guillermo 'guille'" escribió:

entonces ¿que es lo que quieres saber?
¿cómo crear un servicio o cómo comparar dos fechas?

Las fechas se pueden comparar de la forma normal <, > >> Otra cosa es que quieras compararla con un periodo de tiempo.
Aquí tienes un ejemplo de timeSpan
http://www.panoramabox.com/GoPub.aspx?IdObj83


Nos vemos.
Guillermo
Microsoft VB MVP desde 1997
Te invito a mi sitio dedicado al VB y más...
http://www.elguille.info/
http://www.mundoprogramacion.com/
(puede que el correo usado sea anti-spam)


"José Luis" wrote in message
news:
> hola
> Tengo un problema quiero crear un servicio, que se ejecute al prender la
> maquina que, como funcion es que este comprando una fecha obtenida de una
> bd's con la fecha actual del sistema. Y que me despliegue un mensaje.Ya
> cree un servicio que encontre en el
> MSDN
> http://msdn.microsoft.com/library/s...cation.asp
>
> Ya lo hice... si funciona pero quiero comparar las fechas..
> Adios
>
>