Имя: Пароль:
1C
 
Создание пользователей программно
0 vicof
 
06.02.15
13:20
ПользовательОбъект = Справочники.Пользователи.СоздатьЭлемент();

ОбновляемыеСвойства = Пользователи.НовоеОписаниеПользователяИБ();
ОбновляемыеСвойства.Вставить("Имя", Выборка.Логин);
ОбновляемыеСвойства.Вставить("ПолноеИмя", Выборка.Имя);
ОбновляемыеСвойства.Вставить("ПоказыватьВСпискеВыбора", Истина);
ОбновляемыеСвойства.Вставить("АутентификацияОС", Истина);
ОбновляемыеСвойства.Вставить("ПользовательОС", Выборка.Домен + Выборка.Логин);
ОбновляемыеСвойства.Вставить("УникальныйИдентификатор", Неопределено);
            
ПользовательОбъект.ДополнительныеСвойства.Вставить("Действие", "Записать");
ПользовательОбъект.ДополнительныеСвойства.Вставить("ВходВПрограммуРазрешен", Истина);
ПользовательОбъект.ДополнительныеСвойства.Вставить("АутентификацияОС", Истина);
ПользовательОбъект.ДополнительныеСвойства.Вставить("АутентификацияСтандартная", Ложь);
ПользовательОбъект.ДополнительныеСвойства.Вставить("ОбновляемыеСвйоства", ОбновляемыеСвойства);
//ПользовательОбъект.ОбменДанными.Загрузка = Истина;
ПользовательОбъект.Записать();

Надо создать пользователя, чтобы у него поставились галки разрешения входа и установилось имя пользователя ОС.
Конфа: документооборот 1.3
Не хочет работать. Что я не так делаю?
1 vicof
 
06.02.15
13:23
"ПользовательОбъект.ДополнительныеСвойства.Вставить("ОбновляемыеСвйоства", ОбновляемыеСвойства);"
здесь "Свйоства" на "Свойства" поменял
2 vicof
 
06.02.15
13:38
Но не работает. Пользователи создаются,  но разрешения входа нет,  аутентификация не заполнена и не проставлены галки
3 marvak
 
06.02.15
13:46
(0)
А посмотреть как в самой конфе пользователи программно создаются?
4 vicof
 
06.02.15
13:49
(3) Смотрю тонны БСПшного кода, судя по описанию в справочнике пользователей, все должно создаться
5 Я не курил
 
06.02.15
13:51
ПользовательОбъект.ДополнительныеСвойства.Вставить("ОписаниеПользователяИБ", ОбновляемыеСвойства);
может это дб вместо ПользовательОбъект.ДополнительныеСвойства.Вставить("ОбновляемыеСвйоства", ОбновляемыеСвойства);
6 vicof
 
06.02.15
13:57
(5) читаешь мысли, только что вставил, пробую
7 vicof
 
06.02.15
14:08
(5) ругается, "нельзя сделать подготовленным пользователя, которму разрешен вход в программу "
8 vicof
 
06.02.15
15:05
Победил

ПользовательОбъект = Справочник.Пользователи.СоздавтьЭлемент();
ПользовательОбъект.Наименование                     = Выборка.Наименование;
            ПользовательОбъект.ПредставлениеВДокументах            = Выборка.Наименование;
            ПользовательОбъект.ПредставлениеВПереписке             = Выборка.Наименование;
            ПользовательОбъект.ПредставлениеВПерепискеСРангом      = Выборка.Наименование;

ОбновляемыеСвойства = Пользователи.НовоеОписаниеПользователяИБ();
        ОбновляемыеСвойства.Вставить("Имя", Выборка.Логин);
        ОбновляемыеСвойства.Вставить("ПолноеИмя", Выборка.Имя);
        ОбновляемыеСвойства.Вставить("ПоказыватьВСпискеВыбора", Истина);
        ОбновляемыеСвойства.Вставить("АутентификацияОС", Истина);
        ОбновляемыеСвойства.Вставить("ПользовательОС", "\\SL24\" + Выборка.Логин);
        ОбновляемыеСвойства.Вставить("УникальныйИдентификатор", Неопределено);
        ОбновляемыеСвойства.Вставить("Действие", "Записать");
        //ОбновляемыеСвойства.Вставить("ВходВПрограммуРазрешен", Истина);
        ОбновляемыеСвойства.Вставить("АутентификацияСтандартная", Ложь);
            
        ПользовательОбъект.ДополнительныеСвойства.Вставить("Действие", "Записать");
        //ПользовательОбъект.ДополнительныеСвойства.Вставить("ВходВПрограммуРазрешен", Истина);
        ПользовательОбъект.ДополнительныеСвойства.Вставить("АутентификацияОС", Истина);
        ПользовательОбъект.ДополнительныеСвойства.Вставить("АутентификацияСтандартная", Ложь);
        ПользовательОбъект.ДополнительныеСвойства.Вставить("ОписаниеПользователяИБ", ОбновляемыеСвойства);
        //ПользовательОбъект.ОбменДанными.Загрузка = Истина;
        ПользовательОбъект.Записать();