Finish Attribute syncing

Modules.Interfaces/ActiveDirectoryInterface/SyncUsers.MSSQL.vb

@@ -155,6 +155,8 @@ Namespace SyncUsers
         Public Sub AddCustomAttributesToUser(User As ADUser, UserId As Integer) Implements ISyncUsers.AddCustomAttributesToUser
             Dim oCustomAttributes = User.CustomAttributes
 
+            _logger.Debug("Adding {0} Custom Attributes to User {1}", oCustomAttributes.Count, User)
+
             For Each oAttribute In oCustomAttributes
                 Dim oSQL As String = $"UPDATE TBDD_USER SET {oAttribute.MSSQLColumn} = '{oAttribute.Value}', CHANGED_WHO = '{ADDED_WHO}' WHERE GUID = {UserId}"
                 Dim oResult = _mssql.NewExecutenonQuery(oSQL)