This commit is contained in:
2020-09-30 13:24:07 +02:00
parent 84729139ed
commit 2405acc2ce

View File

@@ -67,7 +67,7 @@ Public Class frmMain
Dim firstRow As DataRow = DT_CHECKUSER_MODULE.Rows.Item(0)
Dim userId As Integer = firstRow.Item("USER_ID")
If userId = 0 Then
If userId = 0 And DT_CHECKUSER_MODULE.Rows.Count = 0 Then
MsgBox($"Der Benutzer '{Environment.UserName}' ist nicht in der Benutzerverwaltung vorhanden. {vbCrLf & vbCrLf}Bitte kontaktieren Sie den Administrator, wenn dies ein Fehler ist.", MsgBoxStyle.Critical, "UserManager")
logger.Warn($"Der Benutzer '{Environment.UserName}' ist nicht in der Benutzerverwaltung vorhanden.")
Application.ExitThread()