MS_01.12.2015

2015-12-01 13:16:32 +01:00
parent 2cd1dc3a94
commit 2720196564
10 changed files with 291 additions and 90 deletions
--- a/app/DD-Record-Organiser/ClassInit.vb
+++ b/app/DD-Record-Organiser/ClassInit.vb
@@ -75,6 +75,7 @@ Public Class ClassInit
    Public Sub InitUserLogin()
        Dim sql = sql_UserID
        sql = sql.Replace("@user", Environment.UserName)
+        ClassLogger.Add(">> Neuanmeldung am System: " & Now.ToString, False)
        ClassLogger.Add(">> Username: " & Environment.UserName, False)

        USER_GUID = ClassDatabase.Execute_Scalar(sql)