Hola
Te refieres a que tienes un servicio de windows que esta corriendo y que necesitas registrar si hay algun error ???, pues te aconsejo que en tus metodos trates de Catch cualquier error y escribes a el Event Log de windows cada vez que catch un error, como te decia si lo que tienes es una aplicacion tipo windows services, solo tienes que poner su propiedad AutoLog a True, te pongo un ejemplo en el evento Start de tu services:
Protected Overrides Sub OnStart(ByVal args() As String)
Try
' aqui lo que tengas que hacer en tu services
' si se produce un error el flujo del programa pasar a Catch
Catch ex As Exception
'Escriberemos la Exception que ocurra a el Event Log
Me.EventLog.WriteEntry( ex.Message.ToString(), _ EventLogEntryType.Error)
End Try
End Sub
De no ser una aplicacion windows services, y que sea una de windows simplemente, utilizas tambien el event log de windows, en este caso especifica el source, asi:
EventLog.CreateEventSource("Application_Nombre", "Nuevo_Evento")
Dim evLog As New EventLog("Nuevo_Evento", ".", "Application_Nombre")
evLog.WriteEntry(ex.Message.ToString(), EventLogEntryType.Error)
Espero te sirva
Saludos
Victor Collado