Защита конфигурации от …
(©Топчий Д.Ю.) Бывают моменты в жизни, когда нужно сделать возможность входа только одному пользователю после определенного времени. Ниже приведен такой код.
- Описание
- Подробнее
Описание
Код универсален — может работать и в управляемом приложении (на стороне сервера), и в обычном.
Принцип — после указанной даты не дать запустить 1С. А для того, чтобы не смогли затереть защиту, запретим доступ в конфигуратор, сняв роли со всех пользователей (только роли, у которых есть права на запуск "Конфигуратора"), кроме своего. А так же можно пароль сменить для надежности.
Краткий план действий:
1. Вставляем в модуль приложения "ПередНачаломРаботыСистемы" или еще куда, вызов, чтоб не дать запустить систему.
ОБ=Обработки.СтартСистемы.Создать();
Если ОБ.ПроверкаСтарта() Тогда Отказ=Истина; КонецЕсли;2. Создаем обработку и в модуль объекта ее вписываем код. После, код можно защитить паролем (в меню "Текст" — "Установить пароль").
Функция ПроверкаСтарта() Экспорт
Если ТекущаяДата()>Дата("20150101") Тогда //любую дату, после которой не будет стартовать система
МассивПользователей=ПользователиИнформационнойБазы.ПолучитьПользователей();
Для каждого ПользовательБД ИЗ МассивПользователей Цикл
Если НРег(ПользовательБД.Имя)<>"ИмяВашегоПользователя"
И ПользовательБД.Роли.Содержит(Метаданные.Роли["ПолныеПрава"]) Тогда
ПользовательБД.Роли.Удалить(Метаданные.Роли["ПолныеПрава"]);
ПользовательБД.Роли.Добавить(Метаданные.Роли["МинимальныйНабор"]); //любую роль, чтоб случаем список ролей не был пустым
ИначеЕсли НРег(ПользовательБД.Имя)="ИмяВашегоПользователя" тогда
ПользовательБД.Роли.Добавить(Метаданные.Роли["ПолныеПрава"]);
ПользовательБД.Пароль="ВашПарольНовый";
КонецЕсли;
ПользовательБД.Записать();
КонецЦикла;
Возврат Истина;
КонецЕсли;
Возврат Ложь;
КонецФункцииВот и все. Спасибо за внимание.
Возможно, так же будут вам полезны мои разработки:
- //sale.itcity.ru/public/984171/ — Система настройки произвольных условий регистрации и фильтрации типового обмена вместо правил конвертаций для каждого узла в отдельности (8.3.14+, расширения для УТ 11, КА 2, ERP 2, Розница 2, БП3, УНФ 1.6)
- //sale.itcity.ru/public/1478272/ — Система автоматической загрузки номенклатуры, картинок и связанных данных из различных источников (E-MAIL, HTTP, FTP, ЛОКАЛЬНЫЕ КАТАЛОГИ) (расширение + конфигурация, 8.3.14+, для УТ 11 (все), БП 3, КА 2, ERP 2, УНФ 1.6, Розница 2)
- //sale.itcity.ru/public/1306401/ — Телеграм-бот для передачи файлов и взаимодействия с системой QR-кодирования печатных форм и не только
- //sale.itcity.ru/public/1160676/ — Универсальная система оповещений по произвольным условиям, расписанию, ролям и пользователям (для платформ 8.3.6+, для ЛЮБЫХ баз)
- //sale.itcity.ru/public/1076549/ — САПП — система анализа на наличие проблем и/или предложений в ЛЮБЫХ базах 1С, работающих на платформе 8.3.4+
- //sale.itcity.ru/public/936948/ — Удобная, быстрая и функциональная подсистема обмена между узлами РИБ для УТ 11, УТ 10.3, Альфа — Авто с заменой ссылок в узлах, сравнением документов, командным управлением узлами (для платформы 8.3+)
- //sale.itcity.ru/public/926433/ — Выгрузка в SPOT 2D / ОРИМИ с произвольной структурой полей в файле для УТ 10.3 и не только (платформа 8.3 +)
- //sale.itcity.ru/public/912717/ — Гибкая система расчета зарплаты по произвольной мотивации для УНФ 1.6 и не только (Расширение + Конфигурация, платформа 8.3+)
- //sale.itcity.ru/public/893115/ — QR — штрихкодирование документов БЕЗ изменения печатных форм и конфигурации, с произвольными алгоритмами создания QR -кода и обработки для УТ 11 (все), ERP 2, КА 2, УТ 10.3, Розница 2.2, УНФ 1.6, БП 3
- //sale.itcity.ru/public/845506/ — Контроль над паролями пользователей для ЛЮБОЙ типовой конфигурации, работающей на платформе 8.3 и выше ( + Расширение)
- //sale.itcity.ru/public/149404/ — Выгрузка-загрузка любых данных между похожими или одинаковыми конфигурациями ЛЮБЫХ баз 1С 8.1-8.3
- //sale.itcity.ru/public/127859/ — Быстрый поиск дублей с четким/нечетким поиском по любому сочетанию реквизитов/реквизитов таб. частей с отбором и быстрой заменой значений в ЛЮБЫХ базах
- //sale.itcity.ru/public/692252/ — Сравнение данных РИБ или обменивающихся баз с одинаковыми конфигурациями по контрольным суммам выбранных реквизитов, работающих на платформе 8.3…и выше
- //sale.itcity.ru/public/201119/ — Проведение/снятие с проведения документов/очистки движений не проведенных, перезаписи ссылочных объектов с отборами для баз 1С 8.1-8.3
- //sale.itcity.ru/public/621962/ — "Что? Где? Когда?" или журнал изменений с восстановлением состояния реквизитов ссылочных объектов
- //sale.itcity.ru/public/175028/ — Удаление данных с отбором и построением дерева ссылок в базах 1С 8.1-8.3
- //sale.itcity.ru/public/420278/ — Загрузка иерархии номенклатуры, картинок, штрихкодов, характеристик, доп. реквизитов, цен, поступлений, номен. поставщиков из xls,xlsx,xlsm,ods,ots,csv для УТ 10.3, БП 2.0, УТ 11.1/11.2/11.3, БП 3, КА 2, ERP 2, УНФ 1.6, Розница 2.2
- //sale.itcity.ru/public/427579/ — Мастер выгрузки ЛЮБЫХ данных (остатков, цен, картинок, иерархии, доп. реквизитов, характеристик, штрихкодов и т.д.) в CSV / XLS / XLSX / MXL / ODS / PDF для ЛЮБЫХ баз, работающих на платформе 8.3… и выше
- //sale.itcity.ru/public/832852/ — Мониторинг цен закупки / цен продаж и наценки для Управления Торговлей 11 (все), ERP 2, КА 2, Розница 2.2

