diff --git a/app/DD_Clipboard_Searcher/ClassInit.vb b/app/DD_Clipboard_Searcher/ClassInit.vb
index c558f11..7241ac1 100644
--- a/app/DD_Clipboard_Searcher/ClassInit.vb
+++ b/app/DD_Clipboard_Searcher/ClassInit.vb
@@ -196,8 +196,8 @@ Public Class ClassInit
                 Return False
             End If
             If DT_CHECKUSER_MODULE.Rows.Count = 1 Then
-                Logger.Info(">> Login Username: " & USER_USERNAME, False)
-                Logger.Info(">> Login time: " & Now.ToString, False)
+                Logger.Info("Login Username: " & USER_ID, False)
+                Logger.Info("Login time: " & Now.ToShortDateString, False)
 
                 USER_ID = DT_CHECKUSER_MODULE.Rows(0).Item("USER_ID")
                 USER_SURNAME = NotNull(DT_CHECKUSER_MODULE.Rows(0).Item("USER_SURNAME"), "")
@@ -258,7 +258,7 @@ Public Class ClassInit
                 Next
                 Return True
             Else
-                Logger.Info(" - User '" & USER_USERNAME & "' not listed in Useradministration!", False)
+                Logger.Info(" - UserId '" & USER_ID & "' not listed in Useradministration!", False)
                 'MsgBox("Achtung: Sie sind nicht in der Userverwaltung hinterlegt." & vbNewLine & "Bitte setzen Sie sich mit dem Systembetreuer in Verbindung!", MsgBoxStyle.Critical, "Achtung:")
                 'Me.Close()
                 Dim msg = String.Format("You are not listed in the Useradministration." & vbNewLine & "Please contact the admin.")
@@ -299,13 +299,13 @@ Public Class ClassInit
                     ElseIf DT_CLIENT_USER.Rows.Count = 1 Then
                         CLIENT_SELECTED = DT_CLIENT_USER.Rows(0).Item("CLIENT_ID")
                     Else
-                        Logger.Info("User '" & USER_USERNAME & "' not related to a client", True)
+                        Logger.Info("User '" & USER_ID & "' not related to a client", True)
                         ERROR_INIT = "NO CLIENT"
                         'ERROR_STATE = "NO CLIENT"
                         Return False
                     End If
                 Else
-                    Logger.Info("User '" & USER_USERNAME & "' not related to a client", True)
+                    Logger.Info("User '" & USER_ID & "' not related to a client", True)
                     ERROR_INIT = "NO CLIENT"
                     'ERROR_STATE = "NO CLIENT"
                     Return False
@@ -321,7 +321,7 @@ Public Class ClassInit
 
             If USER_IN_MODULE = False Then
                 If USER_IS_ADMIN = False Then
-                    Logger.Info(" - User: " & USER_USERNAME & " not related to module!", False)
+                    Logger.Info("User: " & USER_ID & " not related to module!", False)
                     Dim msg = String.Format("Sie sind nicht für die Nutzung dieses Moduls freigeschaltet." & vbNewLine & "Bitte setzen Sie sich mit dem Systemadministrator in Verbindung!")
 
                     If USER_LANGUAGE <> LANGUAGE_GERMAN Then