This commit is contained in:
SchreiberM
2016-08-23 15:00:21 +02:00
parent 78907b4bfa
commit 05b5fffc29
6 changed files with 19 additions and 20 deletions

View File

@@ -920,8 +920,8 @@ Public Class frmConstructorDesigner
Select Case cmbRight.Text
Case "Admin"
right = "4"
Case "Read/Write/Rights"
right = "6"
Case "Read/Write"
right = "3"
End Select
Dim sel = String.Format("SELECT COUNT(GUID) FROM TBPMO_ENTITY_SUPERVISOR WHERE ENTITY_ID = {0} AND USER_ID = {1}", SELECTED_ENTITY_ID, row.Item(5))