MS DateEdit

Modules.Interfaces/ActiveDirectoryInterface/SyncUsers.MSSQL.vb

@@ -111,7 +111,10 @@ Namespace SyncUsers
 
             ' Delete users that are assigned to the group but no longer exist in active directory
             Dim oUserIdString = String.Join(",", oSyncedUserIds)
-            Dim oSQL As String = $"DELETE FROM TBDD_GROUPS_USER WHERE USER_ID NOT IN (${oUserIdString}) AND GROUP_ID = {oGroupId}"
+            If oSyncedUserIds.Count = 0 Then
+                oUserIdString = 0
+            End If
+            Dim oSQL As String = $"DELETE FROM TBDD_GROUPS_USER WHERE USER_ID NOT IN ({oUserIdString}) AND GROUP_ID = {oGroupId}"
             Dim oDeletedRelations = _mssql.GetScalarValue(oSQL)
             If oCreatedUsers.Count > 0 Then
                 _logger.Info("Created [{0}] new users", oCreatedUsers.Count)