Имя: Пароль:
1C
1С v8
1С 8.2. Импорт пользователей из Active Directory возможен?
0 pvase
 
09.10.13
13:41
Хочу сделать аутентификацию средствами Виндовс при входе в 1С, для этого есть идея загрузить пользователей из существующей active directory, это возможно? Или надо вручную создавать всех пользователей и прописывать ссылку на пользователя в домене?
1 Галахад
 
гуру
09.10.13
13:44
Обычно основнаая проблема не имена создать, а права раздать.
2 Spieluhr
 
09.10.13
13:47
(0) доменное имя пользователя - это обычная строка, можно создать автоматом, потом переходить к (1)
3 pvase
 
09.10.13
13:51
(2) Вопрос в том, как загрузить эти обычные строки как пользователи 1С. В Excel из active directory выгрузить можно, но как загрузить в список пользователей 1С?
4 php5
 
09.10.13
14:03
(3)

МенеджерПользователейИнформационнойБазы.СоздатьПользователя (InfoBaseUsersManager.CreateUser)
МенеджерПользователейИнформационнойБазы (InfoBaseUsersManager)
СоздатьПользователя (CreateUser)
Синтаксис:
СоздатьПользователя()
Возвращаемое значение:
Тип: ПользовательИнформационнойБазы.
Описание:
Создает описание нового пользователя информационной базы. Для внесения пользователя в список следует после заполнения свойств нового пользователя использовать метод Записать объекта ПользовательИнформационнойБазы.
5 rinatru
 
09.10.13
14:13
(3) вот загрузить-то как раз не проблема..
6 Zaval
 
09.10.13
15:06
(0) Это штатная возможность в Итилиуме
7 pvase
 
23.10.13
12:33
(6) Спасибо. Нашел, но вопрос в другом, что это за объект "ПользователиИнформационнойБазы"? Вот код если кому надо:

Если ПользовательИБ = Неопределено Тогда
        ПользовательИБ = ПользователиИнформационнойБазы.СоздатьПользователя();
    КонецЕсли;
    
    ПользовательИБ.Имя                        = ПользовательСтруктура["Имя"];
    ПользовательИБ.ПолноеИмя                = ПользовательСтруктура["ПолноеИмя"];
    ПользовательИБ.АутентификацияОС            = ПользовательСтруктура["АутентификацияОС"];
    ПользовательИБ.ПользовательОС            = ПользовательСтруктура["ПользовательОС"];
    ПользовательИБ.АутентификацияСтандартная= ПользовательСтруктура["АутентификацияСтандартная"];
    ПользовательИБ.ПоказыватьВСпискеВыбора    = ПользовательСтруктура["ПоказыватьВСпискеВыбора"];
    ПользовательИБ.ЗапрещеноИзменятьПароль    = ПользовательСтруктура["ЗапрещеноИзменятьПароль"];
    ПользовательИБ.РежимЗапуска                = ПользовательСтруктура["РежимЗапуска"];
    
    Если ПользовательСтруктура.Свойство("Пароль") Тогда
        ПользовательИБ.Пароль = ПользовательСтруктура.Пароль;
    КонецЕсли;
    
    ПользовательИБ.ОсновнойИнтерфейс = Метаданные.Интерфейсы.Найти(ПользовательСтруктура["ОсновнойИнтерфейс"]);
    
    ПользовательИБ.Язык = Метаданные.Языки.Найти(ПользовательСтруктура["Язык"]);

    Если СписокРолей <> Неопределено Тогда
        ПользовательИБ.Роли.Очистить();
        Для Каждого СтрокаТаблицы Из СписокРолей Цикл
            Если НЕ СтрокаТаблицы.Пометка Тогда
                Продолжить;
            КонецЕсли;
            
            Роль = Метаданные.Роли.Найти(СтрокаТаблицы.ИмяРоли);
            Если Роль = Неопределено Тогда
                Продолжить;
            КонецЕсли;
            
            ПользовательИБ.Роли.Добавить(Роль);
        КонецЦикла;
    КонецЕсли;
    
    Попытка
        ПользовательИБ.Записать();
    Исключение
        ИнформацияОбОшибке = ИнформацияОбОшибке();
        СообщениеОбОшибке = ИнформацияОбОшибке.Причина.Описание;
        Возврат Неопределено;
    КонецПопытки;
8 pvase
 
23.10.13
12:47
Заметил, что ИТИЛИУМ больше подходит для управления ИТ по стандарту ITIL, там как то более разумно организовано все, но пока не разобрался в схемах эскалации обращений. Не могу найти где настраиваются схемы.
9 zmaximka
 
23.10.13
12:53
(6) это те пользователи которых ты видишь в конфигураторе
10 kiruha
 
23.10.13
13:05
//закомментировано - вставить свое

Попытка
     АДОКоннектор = Новый COMОбъект("ADODB.Connection");
     АДОКоннектор.ConnectionString = "Provider=ADsDSOObject";
     АДОКоннектор.Open();
     ТекстЗапроса = "select mail,name,ObjectGuid   from 'LDAP://DC=закомментировано,DC=ru' WHERE  objectClass='user'";
     ВыборкаИзAD = АДОКоннектор.Execute(ТекстЗапроса);
  Исключение
      Возврат;
  КонецПопытки;
    // доступные поля
    //SELECT [DisplayName], [objectGUID], [distinguishedName], [objectCategory], [groupType], [samAccountType],
    //[UserAccountControl], [ADsPath], [objectSID], [sAMAccountName], [Drink], [whenCreated], [lastLogon], [Name],
    //[Cn], [photo], [managedBy], [givenName], [middleName], [Sn], [Initials], [title], [mail], [physicalDeliveryOfficeName],
    //[streetAddress], [countryCode], [postOfficeBox], [L], [St], [C], [Co], [postalCode], [TelephoneNumber], [facsimileTelephoneNumber],
    //[mobile], [ipPhone], [homePhone], [pager], [profilePath], [scriptPath], [info], [homeDrive], [homeDirectory], [manager], [company],
    //[department], [departmentNumber], [division], [employeeID], [employeeNumber], [employeeType], [Enabled]
    Если ВыборкаИзAD.RecordCount <> 0 И ВыборкаИзAD.BOF = False И ВыборкаИзAD.EOF = False Тогда
        COMSafeArray = ВыборкаИзAD.GetRows() ;
    Иначе
        Возврат  ;
    КонецЕсли;    
    МассивВыгрузки= COMSafeArray.Unload() ;
Программист всегда исправляет последнюю ошибку.