MS_1708
This commit is contained in:
@@ -281,8 +281,7 @@
|
||||
Sub Load_Selectable_Users_for_Groups()
|
||||
Try
|
||||
DD_ECMAdmin.TBAD_Users.Clear()
|
||||
|
||||
Dim sql = String.Format("SELECT DISTINCT T.GUID, T.USERNAME, T.EMAIL FROM TBDD_USER T where T.GUID in (SELECT DISTINCT USER_ID FROM TBDD_CLIENT_USER WHERE CLIENT_ID IN ({0})) ORDER BY T.USERNAME", USER_CLIENTS_COMMA_SEPERATED)
|
||||
Dim sql = String.Format("SELECT DISTINCT T.GUID, T.USERNAME, T.EMAIL FROM TBDD_USER T where T.GUID in (SELECT DISTINCT USER_ID FROM TBDD_CLIENT_USER WHERE CLIENT_ID IN (SELECT CLIENT_ID FROM TBDD_CLIENT_USER WHERE USER_ID = {0})) ORDER BY T.USERNAME", USER_GUID)
|
||||
Dim DT As DataTable = ClassDatabase.Return_Datatable(sql)
|
||||
For Each userrow As DataRow In DT.Rows
|
||||
Dim newUserRow As DD_ECMAdmin.TBAD_UsersRow
|
||||
|
||||
Reference in New Issue
Block a user