diff --git a/tsNotificacionesClient.vb b/tsNotificacionesClient.vb index a6c7e86..68f08a1 100644 --- a/tsNotificacionesClient.vb +++ b/tsNotificacionesClient.vb @@ -71,9 +71,7 @@ Public Class TsNotificacionesClient ' ============================================================ If EsWindows Then ' --- WINDOWS: Event Viewer --- - If Not EventLog.SourceExists(Origen) Then - EventLog.CreateEventSource(Origen, Aplicacion) - End If + Dim ele As EventLogEntryType Select Case TipoNotificacion @@ -85,7 +83,7 @@ Public Class TsNotificacionesClient ele = EventLogEntryType.Error End Select - EventLog.WriteEntry(Origen, $"{titulo} {descripcion}", ele) + EventLog.WriteEntry(".NET Runtime", $"{Origen} {Aplicacion} {titulo} {descripcion}", ele, 1000) Else ' --- LINUX: ILogger → journald --- diff --git a/tsUtilidades.vbproj b/tsUtilidades.vbproj index 5e1c53f..f1b5b2f 100644 --- a/tsUtilidades.vbproj +++ b/tsUtilidades.vbproj @@ -16,11 +16,12 @@ net8.0 tsUtilidades net8.0, libreria - 1.1.11 + 1.1.12 Manuel Tecnosis S.A Utilidades Varias + - 2026-04-10 1.1.12 Se corrige tsNotificacionesClient - 2026-04-28 1.1.11 Se añade log del sistema a tsNotificacionesClient - 2026-04-10 1.1.10 Se corrige tsNotificacionesClient - 2026-04-10 1.1.9 Se corrige tsNotificacionesClient