MS18.10.2017
This commit is contained in:
@@ -594,7 +594,7 @@ Public Class frmUserKonfig
|
||||
result = MessageBox.Show(msg, "Confirmation:", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
|
||||
If result = MsgBoxResult.Yes Then
|
||||
Dim del = "EXEC [dbo].[PRPMO_DELETE_USER] " & USER_GUIDTextBox.Text
|
||||
If ClassDatabase.Execute_non_Query(del, True) = True Then
|
||||
If ClassDatabase.Execute_non_Query(del) = True Then
|
||||
Load_User()
|
||||
Else
|
||||
MsgBox("Unexpected Error while deleting User.", MsgBoxStyle.Exclamation)
|
||||
|
||||
Reference in New Issue
Block a user