AppStd/Monorepo
8
1
Fork 0
Code Issues Pull Requests Releases Wiki Activity

remove users from group on sync

Browse Source
This commit is contained in:
Jonathan Jenne 2020-04-09 12:36:19 +02:00
parent 84ebac00a9
commit b1f7883757
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
Modules.Interfaces/ActiveDirectoryInterface/SyncUsers.MSSQL.vb
View File

@ -106,13 +106,14 @@ Namespace SyncUsers
oSyncedUsers.Add(oUser)
Next
' Delete users that are assigned to the group but no longer exist in active directory
Dim oUserIdString = String.Join(",", oSyncedUserIds)
Dim oSQL As String = $"SELECT COUNT(*) FROM TBDD_GROUPS_USER WHERE USER_ID NOT IN (${oUserIdString}) AND GROUP_ID = {oGroupId}"
Dim oSQL As String = $"DELETE FROM TBDD_GROUPS_USER WHERE USER_ID NOT IN (${oUserIdString}) AND GROUP_ID = {oGroupId}"
Dim oDeletedRelations = _mssql.GetScalarValue(oSQL)
_logger.Info("Deleted [{0}] user to group relations [TEST RUN]", oDeletedRelations)
_logger.Info("Created [{0}] new users", oCreatedUsers.Count)
_logger.Info("Updated [{0}] users", oUpdatedUsers.Count)
_logger.Info("Removed [{0}] users from Group [{1}]", oDeletedRelations, GroupName)
Return oSyncedUsers
End Function