польз = СоздатьОбъект("UsersList1c.Users");
Если польз.SelectUsers(КаталогИБ()) = 0 Тогда
Сообщить("Не удалось получить список пользователей");
Возврат 0;
КонецЕсли;
колПольз = польз.NumUsers();
для сч = 1 По колПольз Цикл
юзер = польз.GetUser(сч);
ИмяПольз = юзер.UserName;
ПраваПольз = юзер.Rights;
Интерфейс = юзер.Interface;
КонецЦикла;