Imports System.Runtime.Serialization Namespace Messages Public Class ServiceStatusResponse Public Property ActiveSessionCount As Integer Public Property ActiveUsers As List(Of String) Public Property ActiveSessions As Dictionary(Of String, String) Public Property Timestamp As DateTime Public Property RecentUsers As List(Of String) = New List(Of String)() Public Property LastJobDurationMs As Long = 0 Public Property LastJobName As String = String.Empty Public Property LastJobTimestamp As DateTime = DateTime.MinValue Public Property SlowQueryCount As Integer = 0 ' Queries > 10s seit Service-Start Public Property CachedTablesSnapshotAge As Integer = 0 ' Sekunden seit letztem Snapshot End Class End Namespace