Заведение Пользователя Во Всех Имеющихся БД

23.11.09

Администрирование - Информационная безопасность

–1

Заведение Пользователя Во Всех Имеющихся БД

Скачать исходный код

	Наименование	Файл	Версия	Размер
	- .rar 417,13Kb 144	.rar		417,13Kb	144	Скачать

Дело в том, что в нашей организации около 50ти Баз Данных. И логинить во всех них одного пользователя довольно утомительно. Вот собственно и созрела данная обработочка.

1. Есть списки (txt). В них пути к БД. Списки разбиты на разные конфигурации (к примеру: ЗИК БУХ ТИС).

2. В стандартной вариации конфигурации существуют как правило одинаковые права и интерфейсы (для этого собственно и необходимо разбиение п.1 ).

В Бухгалтерии есть стандартный интерфейс "Бухгалтер" и стандартные права: "Администратор", а так как жесткие правила доступа в Бухгалтерии у нас не ведутся, я ставлю им стандартные интерфейсы, стандартные права, создаю ему каталог, ставлю пароль.......... Вообщем проделав это действие в 30ти Базах Данных начинаешь понимать чта проще что-то дописать.....

Вот что и родилось в океане любви и нежности к себе..............

–1

См. также

[7.7 ТиС. СТОП-БАРДАК] Автоперенос непроведенных документов на текущий день

Инструменты администратора БД Оперативный учет 7.7 1С:Торговля и склад 7.7 Управленческий учет Абонемент ($m)

Боремся с бардаком. Работы в прошлых датах запрещены. Непроведенные документы (по разным причинам) - автоматом переносятся в начало текущего дня при запуске любого первого сеанса 1С в текущем дне. Задержка старта 1С - практически незначима. Не требует настройки, не требует допрограммирования (исключая один оператор вставки в процедуру старта системы). Можно обработку выполнять вручную с любой периодичностью.

2 стартмани

25.05.2020 5704 2 CheBurator 3

Индивидуальная установка даты запрета редактирования документов в торговле 1С 7.7

Информационная безопасность Закрытие периода Оперативный учет 7.7 1С:Торговля и склад 7.7 Россия Управленческий учет Абонемент ($m)

Установка даты запрета редактирования документов индивидуально для каждого пользователя,а также предоставление в индивидуальном порядке разрешения изменения конкретных документов в определенные периоды или в конкретные дни.Срок действия установок устанавливается вами. Вы можете спокойно настроить и уехать в отпуск.

1 стартмани

17.01.2013 31035 50 agent007_1 10

Автоматическая распаковка дистрибутивов конфигураций 7.7 для Windows Vista / 7 (x32, x64)

Инструменты администратора БД Платформа 1С v7.7 Конфигурации 1cv7 Россия Абонемент ($m)

Многие, наверное, сталкивались с проблемой установки конфигураций для платформы 1С 7.7 под Windows 7 или Windows Vista ... Есть масса способов распаковать дистрибутив конфигурации 7.7 под этими ОС, XP Mode, VMWare с WinXP в ней, "недокументированный" метод с периодическим запуском Центра Управления Сетями и Общим Доступом во время установки конфигурации. В данной статье представлен способ позволяющий автоматизировать этот процесс, т.е. извлечь все файлы из дистрибутива конфигурации в один клик, как будто мы его установили.

1 стартмани

27.03.2012 83610 1435 twilight5023 106

242

v77. Блокировка системы

Инструменты администратора БД Платформа 1С v7.7 Конфигурации 1cv7 Россия Бесплатно (free)

Инструмент администратора. Блокировка системы с целью "горячего" резервного копирования ИБ.

23.03.2012 13788 34 item 22

Запуск внешней обработки по расписанию v7.7

Инструменты администратора БД Платформа 1С v7.7 Конфигурации 1cv7 Россия Бесплатно (free)

Неоднократно возникали задачи организовать, например ежедневную выгрузку и отправку отчетов по эл.почте, и вот…

20.03.2012 48881 Yury1001 17

Перенос даты запрета редактирования

Инструменты администратора БД Закрытие периода Оперативный учет 7.7 1С:Торговля и склад 7.7 Россия Абонемент ($m)

Обработка автоматического запуска восстановления последовательностей и установки даты запрета редактирования документов.

1 стартмани

15.02.2012 16865 40 avers007 3

Помощник по сопровождению баз 1С:Предприятие 7.7

Инструменты администратора БД Платформа 1С v7.7 Конфигурации 1cv7 Россия Абонемент ($m)

Программа для сопровождения баз 1С:Предприятие 7.7. Облегчает процесс обновления множества баз. Позволяет запускать архивацию нужной базы одним щелчком.

1 стартмани

13.02.2012 10980 48 alexkrv 7

Скрипт для обновления регламентированной отчетности в нескольких базах сразу, не надо заходить в 1с. Скрипт сам распаковывает и копирует.

Регламентированный учет и отчетность Инструменты администратора БД Закрытие периода Бухгалтерский учет 7.7 1С:Бюджет муниципального образования 7.7 1С:Бухгалтерия 7.7 1С:Зарплата и кадры 7.7 1С:Комплексная 7.7 1С:Производство+Услуги+Бухгалтерия 1С:Бухгалтерия для бюджетных учреждений 7.7 Россия Бухгалтерский учет Абонемент ($m)

Скрипт извлекает файлы по временную папку. Затем по каждой базе из списка копирует файлы туда, где они должны быть. При необходимости создаёт каталог для файлов отчетности, обычно если это первая версия отчетности квартала. Если не первая - обновляет файлы. Корректно копирует по сети и локально. Необходимо лишь указать в файле полный путь к каждой базе.

1 стартмани

13.02.2012 15572 33 evgenum 14

Комментарии

Подписаться на ответы Инфостарт бот

Свернуть все

1. ACE$ 47 23.11.09 15:45 Сейчас в теме

аааа... где?

2. ACE$ 47 23.11.09 15:45 Сейчас в теме

извиняюсь, после обновления страницы все появилось

3. Myti 86 23.11.09 15:45 Сейчас в теме

секунду....счас

4. Myti 86 23.11.09 15:46 Сейчас в теме

Сразу оговорюсь...........Компонента написана немной...........Респект разработчику

5. Myti 86 23.11.09 15:48 Сейчас в теме

Хотел сделать еще предварительный пинг адресов.........но это позднее............если кому то понадобиться конечна........

12. GSoft 2235 25.11.09 10:58 Сейчас в теме

(5) пинг адресов очень просто командой системы

Код
Если ВыбЗнач = "Выполнить команду PING" Тогда Попытка //ЗапуститьПриложение("cmd /k /t:0a ping " + Адрес); ЗапуститьПриложение("ping -t " + Адрес); Исключение //КомандаСистемы("start ping " + Адрес); КонецПопытки; ИначеЕсли ВыбЗнач = "Открыть в проводнике (сетевое окружение)" Тогда ЗапуститьПриложение("\" + Адрес); ИначеЕсли ВыбЗнач = "Список ПО (при наличии FPinger)" Тогда ВывестиСписокПО(ИмяПК); ИначеЕсли ВыбЗнач = "Log Off" Тогда Если Вопрос("Будет произведена попытка послать команду ""Log Off"" компьютеру """ + Адрес + """. Продолжить?", "Да+Нет") = "Нет" Тогда Возврат; КонецЕсли; глВыключениеУдаленногоКомпьютера(Адрес, 4); ИначеЕсли ВыбЗнач = "Reboot" Тогда Если Вопрос("Будет произведена попытка послать команду ""Reboot"" компьютеру """+ Адрес + """. Продолжить?", "Да+Нет") = "Нет" Тогда Возврат; КонецЕсли; глВыключениеУдаленногоКомпьютера(Адрес, 6); ИначеЕсли ВыбЗнач = "Shutdown" Тогда Если Вопрос("Будет произведена попытка послать команду ""Shutdown"" компьютеру """+ Адрес +""". Продолжить?", "Да+Нет") = "Нет" Тогда Возврат; КонецЕсли; глВыключениеУдаленногоКомпьютера(Адрес, 5); КонецЕсли; Показать полностью

Код

 

      Если ВыбЗнач = "Выполнить команду PING" Тогда 
         Попытка
            //ЗапуститьПриложение("cmd /k /t:0a ping " + Адрес);
            ЗапуститьПриложение("ping -t " + Адрес);
         Исключение
            //КомандаСистемы("start ping " + Адрес);
         КонецПопытки;
      ИначеЕсли ВыбЗнач = "Открыть в проводнике (сетевое окружение)" Тогда
         ЗапуститьПриложение("\" + Адрес);
      ИначеЕсли ВыбЗнач = "Список ПО (при наличии FPinger)" Тогда
          ВывестиСписокПО(ИмяПК);
      ИначеЕсли ВыбЗнач = "Log Off" Тогда
         Если Вопрос("Будет произведена попытка послать команду ""Log Off"" компьютеру """ +
         Адрес + """. Продолжить?", "Да+Нет") = "Нет" Тогда
            Возврат;
         КонецЕсли;
         глВыключениеУдаленногоКомпьютера(Адрес, 4);
      ИначеЕсли ВыбЗнач = "Reboot" Тогда
         Если Вопрос("Будет произведена попытка послать команду ""Reboot"" компьютеру """+
         Адрес + """. Продолжить?", "Да+Нет") = "Нет" Тогда
            Возврат;
         КонецЕсли;
         глВыключениеУдаленногоКомпьютера(Адрес, 6);
      ИначеЕсли ВыбЗнач = "Shutdown" Тогда
         Если Вопрос("Будет произведена попытка послать команду ""Shutdown"" компьютеру """+
         Адрес +""". Продолжить?", "Да+Нет") = "Нет" Тогда
            Возврат;
         КонецЕсли;
         глВыключениеУдаленногоКомпьютера(Адрес, 5);
      КонецЕсли;

Показать полностью

13. Myti 86 25.11.09 11:04 Сейчас в теме

(12) - Спасибо...спасибо.....Но мне как то Скрипты ближе, чтоли........
Хотя способ прикольный, а главное......более восприимчивый :)

6. ghostishe 292 23.11.09 15:51 Сейчас в теме

(0)
1. Есть списки (txt). В них пути к БД.

Они у всех что ли есть? Или надо создавать списки?

7. Myti 86 23.11.09 16:06 Сейчас в теме

:D ню у нас точно есть...Помнить пути 50ти баз .НЕРЕАЛЬНО

8. vovan519 276 24.11.09 17:09 Сейчас в теме

Не хотел писать комментарий, но фраза "Вот что и родилось в океане любви и нежности к себе" просто повергла в ступор.
Как можно одновременно любить себя и заставлять свои ЛЮБИМЫЕ ПАЛЬЧИКИ стучать по клавиатуры, набирая права пользователя и интерфейс пользователя ВРУЧНУЮ, когда все знают и автор в том числе, как их получить при помощи UsersDef. И как их не жаль при заполнении списка баз в текстовом файле, хотя получить список путей к базам не состовляет труда. Не понимаю о какой любви тут идет речь?

9. Myti 86 24.11.09 17:17 Сейчас в теме

Списки БД обновляються и составляються автоматом (ServisDesk).
А UsersDef использовать нехотелось. Дело в том что основная цель обработки, это заведение одного пользователя в несколько БД.
и есле спрашивать интерфейс и права при заведении в каждую БД - то ето уже не автомат.
А дополнить можно чем угодно.........................................
Кстита, принимаю идею на доработку, одна есть....

10. fastwriter 6 25.11.09 08:51 Сейчас в теме

А оно новые права ставит в конец списка или в алфавитном порядке?
Если нет - хорошо бы добавить такую возможность.

11. Myti 86 25.11.09 10:50 Сейчас в теме

(10) - В конец списка,,,,,.добавим

14. GSoft 2235 25.11.09 11:20 Сейчас в теме

если делать пингование скриптами то только для того чтобы не дать пользователю доступ к командной строке, перенаправить результат работы в текстовый файл и открыть его

но тогда вопрос - если пользователю нельзя пользоваться командной строкой - то зачем ему пингование))

18. vovan519 276 25.11.09 15:57 Сейчас в теме

(14) "если делать пингование скриптами то только для того чтобы не дать пользователю доступ к командной строке, перенаправить результат работы в текстовый файл и открыть его ..."

Позвольте категорически не согласиться с Вами. Даже аргументировать не хочеться

15. Myti 86 25.11.09 11:26 Сейчас в теме

))) н...дя...........ясненько

16. MadDAD 152 25.11.09 11:37 Сейчас в теме

При некоторой доработке заработао в нужном виде.

17. Myti 86 25.11.09 11:49 Сейчас в теме

(16) - вот и отличненько..........

19. Altair777 644 25.11.09 16:04 Сейчас в теме

(0) Долго думал, как это оценить.
И решил, что отрицательно. Вы же программист 1С, а мыслите не 1С-овскими категориями.
Почему текстовые файлы со списком баз? Почему Вы не создали отдельную конфу, где это можно было сделать красиво и удобно?
Со справочниками... с докуменатами. С отчетами, в конце концов :)
Минус не за разработку... Это тактика. Минус за стратегию.
Не рекомендую я это другим пользователям со схожей задачей.

20. Myti 86 25.11.09 17:12 Сейчас в теме

(19) -
1. Список есть в Экселе, системщики с ним работают, им удобно.
Пересаживать их на писанную конфу не целесообразно. Да и проблематично.
Списки в тексте потому, что надо разделять Базы по конфигурациям.
Из экселя брать тоже нерезонно.
2. Подобная конфа уже есть, там правда работа с сетью в основном.
Плагиатом я незанимаюсь.
3. Вот как наберу кучу полезностей, сразу напишу конфу со всему.....
А пока, цените так как есть......... :)))

21. Bosma 69 11.12.09 10:48 Сейчас в теме

(20) конфигурация уже есть http://infostart.ru/public/20072/ Пользуйтесь.

22. Myti 86 11.12.09 11:17 Сейчас в теме

(21) - Респект разработке.
Но функция заведения одного пользователя во все БД отсутствует.

23. Bosma 69 11.12.09 11:22 Сейчас в теме

(22) Одним нажатием - да, отсутствует, (надо выбрать к каким базам и с какими правами добавлять) но часто ли надо добавлять пользователя во ВСЕ базы? у нас даже глав. бух. далеко не во все базы доступ имеет. :)