This commit is contained in:
Digital Data - Marlon Schreiber
2018-06-20 16:34:29 +02:00
parent e38b5366a7
commit 42e0fd9a48
4 changed files with 29 additions and 17 deletions

View File

@@ -145,9 +145,8 @@ Public Class frmMain
If ERROR_INIT = "NO CLIENT" Then
MsgBox("You are not related to a client!" & vbNewLine & "Please contact the system administrator!", MsgBoxStyle.Exclamation)
Else
MsgBox("Sorry Something went wrong in user configuration!" & vbNewLine & "Please contact the system administrator!", MsgBoxStyle.Exclamation)
MsgBox("Sorry Something went wrong in user configuration!" & vbNewLine & "Reason: " & ERROR_INIT & vbNewLine & "Please contact the system administrator!", MsgBoxStyle.Exclamation)
End If
Exit Sub
End If
Me.NotifyIconMain.Visible = True