|
Как изменить пароль Пользователя в режиме Предприятие | ☑ | ||
---|---|---|---|---|
0
fazliddinuz
05.09.20
✎
09:31
|
Добрый день, есть само письная конфигурация. Нужно сделать так, чтобы обичные пользователи могуть изменят свойи пароли. Много раз питался стедать это, но без административных прав видается ошибка что нет доступа. Если включить админитсративные правы тогда можно и в конфигуратор входить. Подскажите пожалуйста как сделать ?
Заранее спасибо |
|||
1
Фрэнки
05.09.20
✎
10:06
|
Эта самописная конфигурация в каком-то интерфейсе управляемых форм? На каком-то БСП основана? Или это морально устаревшие "обычные формы" и тем более без БСП?
|
|||
2
Ненавижу 1С
гуру
05.09.20
✎
10:24
|
Можно при записи пароля установить привелигированный режим программно и потом отключить. Точнее он сам отключится
|
|||
3
fazliddinuz
05.09.20
✎
10:40
|
(1) Это конфигурация в управляемых формах но без БСП.
|
|||
4
fazliddinuz
05.09.20
✎
11:16
|
(2) Спасибо! В дали мне идея и дальше по этой теме https://forum.infostart.ru/forum9/topic76974/ решил проблема половина.
Создал Общий привелигированный модуль и там экспортная процедура. В начале процедуры установил привелигированный режим. И если пользователь изменяет свой пароль эта получается но при изменение пароль другого пользователя или при попытка нового пользователя все равно ошибка видается что нет прав для выполнение операции. В чем может быть проблема? Вот мой код В модуле форме: Функция ИзменитьПользователь(Наим, Рол, Парол) ПаролниУзгартириш.ФойдаланувчиниТахрирлаш(Поль,Наим,Парол, Рол); КонецФункции В общем привелигированном модуле ПаролниУзгартириш : Процедура ФойдаланувчиниТахрирлаш(Фойд, Номи, Парол, Рол) Экспорт УстановитьПривилегированныйРежим(истина); Если НЕ Фойд.Имя="" Тогда Фойд.Имя = Номи; Фойд.ПолноеИмя = Номи; Фойд.Пароль = Парол; Фойд.Роли.Очистить(); Фойд.Роли.Добавить(Метаданные.Роли.Найти(Рол)); Фойд.АутентификацияСтандартная=Истина; Фойд.Записать(); Иначе НовФойд = ПользователиИнформационнойБазы.СоздатьПользователя(); НовФойд.Имя = Номи; НовФойд.Роли.Добавить(Метаданные.Роли.Найти(Рол)); НовФойд.Пароль= Парол; НовФойд.ПоказыватьВСпискеВыбора=Ложь; НовФойд.АутентификацияСтандартная=Истина; НовФойд.Записать(); КонецЕсли; КонецПроцедуры |
|||
5
fazliddinuz
05.09.20
✎
16:01
|
up
|
|||
6
acht
05.09.20
✎
16:10
|
(4) > ПаролниУзгартириш.ФойдаланувчиниТахрирлаш(Поль,Наим,Парол, Рол);
Как, однако, 1С на киргизском сурово звучит. |
|||
7
fazliddinuz
26.09.20
✎
14:04
|
(6) Это не на киргизском а на Узбекском язык
|
|||
8
ДенисЧ
26.09.20
✎
14:09
|
Неадминистратор может менять только свой пароль.
|
|||
9
Cthulhu
27.09.20
✎
02:40
|
(8)+: но можно загнать изменения паролей в регистр сведений - и слепить фоновое задание, которое под админом будет по таймауту парсить этот рс, менять тошоненадо на тошонадо и при успехе - зачищать записи... нэ?..
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |