Modber Сообщество
профессионалов по 1С

v8: контроль выхода из системы

как управлять выходом из системы
  
Сообщений: 11

0
Если обработка сделана под программу, и изменить ее невозможно для 1С: Бухгалтерии. Суть программы такая: устанавливаем время, ну, например, 21:00, выбираем Тип действия: "Выход с сохранением данных" вставляем текст, а когда наступает 21:00 и остались пользователи, которые сидят в 1С, то им открывается сообщение о закрытии доступа, после 21:00 пользователи не зайдут. Это хорошая функция, когда пользователи висят в 1С, и мешают мне сделать архив. У кого есть такие обработка делитесь, а я могу свою дать, чтоб переделать.
МедальГрамота
Сообщений: 546

+9
Что именно то переделать?
Грамота
Сообщений: 83

0
У пользователей на ПК добавить при блокировке станции (в планировщике Windows для триггера "блокировка рабочей станции") команду для закрытия всех экземпляров 1С: [code=1C]taskkill /IM 1c* /f[/code] Или задание на выключение ПК в 20:30, например. Правда, тогда, если кто-тот задержится после 20:30 может получить сюрприз...
Грамота
Сообщений: 156

+2
Например можно сделать справочник пользователей с графой: Отключить от системы. При необходимости ставить галочку напротив пользователя в этой графе и нажимать кнопку ДА. Тут надо написать обработчик этого функционала. Или использовать скрипт, в сети таких полно, например: Скрипт на VBS в расписание заданий: 'имя пользователя 1С:Предприятия UserName = "USER" 'пароль пользователя 1С:Предприятия UserPass = "PASS" 'имя сервера 1С ServerName = "SERVER" BaseName = "BASE" 'Удаление всех соединений заданной ИБ сервера 1С Dim сonnector Set сonnector = СreateObject("v8.СOMСonnector") Dim sеrvеr Sеt sеrvеr = сonnector.СonnectServer(ServerName) servеr.AddAuthеntication UsеrNаmе, UsеrPаss Dim ibDеsc Sеt ibDеsc = sеrvеr.CrеatеInfoBaseInfo() ibDеsc.Nаmе = BasеName Dim cоnnеctions connеctions = sеrvеr.GetIBCоnnections(ibDеsc) Dim i Dim connеction Fоr i = LBоund(connеctions) Tо UBоund(connеctions) sеt connеction = connеctions(i) sеrvеr.Disconnеct connеction Nеxt
В начало страницы 
|
Перейти на форум: