Имя: Пароль:
1C
 
Завести нового пользователя ИБ программно
0 AlStorm
 
18.06.10
03:30
НЕ обязательно именно в работающей базе, можно и в другой. Может через ОЛЕ как-нибудь..
Даже не знаю, тупо интересно, возможно ли :)
1 miron82
 
18.06.10
07:26
Как программно добавить пользователя в информационную базу?

НовыйПользователь = ПользователиИнформационнойБазы.СоздатьПользователя();
НовыйПользователь.Имя = "Имя";
НовыйПользователь.ПолноеИмя = "Фамилия Имя Отчество";
НовыйПользователь.АутентификацияСтандартная = Истина;
НовыйПользователь.ОсновнойИнтерфейс = Метаданные.Интерфейсы.Администратор;
НовыйПользователь.Пароль = "пароль";
НовыйПользователь.Роли.Добавить(Метаданные.Роли.Администратор);
НовыйПользователь.ПоказыватьВСпискеВыбора = Ложь;
НовыйПользователь.Язык = Метаданные.Языки.Русский;

НовыйПользователь.Записать();


ЗаписатьНовогоПользователя(НовыйПользователь);


Процедура ЗаписатьНовогоПользователя(НовыйПользователь) Экспорт

   // Проверить наличие роли Администратор у нового пользователя.
   РольАдминистратор = Метаданные.Роли.Администратор;
   Если НовыйПользователь.Роли.Содержит(РольАдминистратор) Тогда
       Сообщить("Добавление пользователя с административными правами запрещено.");
   
   Иначе // у нового пользователя нет роли Администратор

       // Проверить, что текущий пользователь обладает правами Менеджера
       // или Администратора
       Если РольДоступна(РольАдминистратор) ИЛИ РольДоступна(Метаданные.Роли.Менеджер) Тогда

           // Выполнить запись нового пользователя.
           НовыйПользователь.Записать();
   
       Иначе
           Сообщить("Недостаточно прав доступа для добавления пользователя.");
       КонецЕсли;
   КонецЕсли;

КонецПроцедуры
2 AlStorm
 
18.06.10
07:28
(1)
О, спасибо! А по ОЛЕ прокатит?
3 miron82
 
18.06.10
07:38
Сам не пробовал, если правильно организовать, то не вопрос... прокатит...