Заказы на доработку 1С (сервис удаленной работы)

Хранилище

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

Здравствуйте, гость ( Вход | Зарегистрироваться )



> Удаленное управление клиентом , ЗавершитьРаботуСистемы() для сети          
l2d808 Подменю пользователя
сообщение 29.08.11, 13:44
Сообщение #1

Завсегдатай
Иконка группы
Группа: Местный
Сообщений: 248
Из: Советский Союз
Спасибо сказали: 66 раз
Рейтинг: 0

Подскажите пожалуйста как ДЛЯ ПЛАТФОРМЫ 7,7 (не SQL) ЗавершитьРаботуСистемы() использовать абсолютно для всех пользователей или для какого-то одного вырубить 1с-ку по сети.


Signature
Короеды это не жуки. Это пользователи. Они едят кору головного мозга ...

Flexy Подменю пользователя
сообщение 29.08.11, 13:53
Сообщение #2

Танцор с Бубном
Иконка группы
Группа: Местный
Сообщений: 1121
Из: Днепра
Спасибо сказали: 232 раз
Рейтинг: 0

Вот обработка [необходимо зарегистрироваться для просмотра ссылки]
Иногда, когда не было обработки под рукой и зависали сеансы пользователей и т.д.
На сервере: Администрирование = Управление Компьютером = Общие Папки = Сеансы = Завершить Сеанс.

Спасибо сказали: l2d808, wasdik,

Vofka Подменю пользователя
сообщение 29.08.11, 14:10
Сообщение #3

У нас здесь своя атмосфера...
***********
Группа: Основатель
Сообщений: 14052
Из: Киев
Спасибо сказали: 4613 раз
Рейтинг: 3750.1

Цитата
Вот обработка [необходимо зарегистрироваться для просмотра ссылки]

Там не обработка, а MD с кодом:

Перем ВремяКомандыВыхода;

Функция ПолучитьВремя()
    ТекДата=ТекущаяДата();
    ТекЧас=0; ТекМин=0; ТекСек=0;
    ТекущееВремя(ТекЧас,ТекМин,ТекСек);
    Возврат ((ТекДата-Дата("01.01.80"))*86400+ТекЧас*3600+ТекМин*60+ТекСек);
КонецФункции

Процедура ВыходИзСистемы()
    Если НЕ(Константа.ВыходИзСистемы=0) Тогда
        Если (ВремяКомандыВыхода=0) Тогда
            ВремяКомандыВыхода=ПолучитьВремя();
            Предупреждение("Внимание! Через "+Константа.ВыходИзСистемы+" минут(ы) программа 1С завершит работу.",60);
        Иначе
            ТекВремя=ПолучитьВремя();
            Если (ТекВремя-ВремяКомандыВыхода>=Константа.ВыходИзСистемы*60) Тогда
                ЗавершитьРаботуСистемы(0);
            КонецЕсли;
        КонецЕсли;
    КонецЕсли;    
КонецПроцедуры          

Процедура ПриНачалеРаботыСистемы()
    ВремяКомандыВыхода=0;
    Если НЕ(НазваниеНабораПрав()="Администратор") И НЕ(Константа.ВыходИзСистемы=0) Тогда
        ЗавершитьРаботуСистемы(0);
    КонецЕсли;
    Если НЕ(НазваниеНабораПрав()="Администратор") Тогда
        ОбработкаОжидания("ВыходИзСистемы",10);
    КонецЕсли;    
КонецПроцедуры

Спасибо сказали: l2d808,

alex040269 Подменю пользователя
сообщение 29.08.11, 14:11
Сообщение #4

Крутой
Иконка группы
Группа: Местный
Сообщений: 1626
Из: Гуляйполе
Спасибо сказали: 236 раз
Рейтинг: 0

Цитата(l2d808 @ 29.08.11, 14:44) *
Подскажите пожалуйста как ДЛЯ ПЛАТФОРМЫ 7,7 (не SQL) ЗавершитьРаботуСистемы() использовать абсолютно для всех пользователей или для какого-то одного вырубить 1с-ку по сети.

никак разве что через ОбработкаОжидания("ЗавершениеРаботы",5);


Signature
Никогда не бойся делать то, что не умеешь, помни - Ноев ковчег был построен любителем, профессионалы построили Титаник.
ЗиУП

kalyamov Подменю пользователя
сообщение 29.08.11, 15:43
Сообщение #5

Завсегдатай
Иконка группы
Группа: Местный
Сообщений: 186
Спасибо сказали: 31 раз
Рейтинг: 0

Вот еще что-то , правда еще не проверял. [необходимо зарегистрироваться для просмотра ссылки]

shurick31 Подменю пользователя
сообщение 01.09.11, 18:41
Сообщение #6

Молчаливый
*
Группа: Пользователи
Сообщений: 1
Спасибо сказали: 0 раз
Рейтинг: 0

Интересное решение.
я пользовался чатом для 1С
[необходимо зарегистрироваться для просмотра ссылки]
тоже всех выгнать можно

Не нашли ответа на свой вопрос?
Зарегистрируйтесь и задайте новый вопрос.


Ответить Новая тема
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 

RSS Текстовая версия Сейчас: 03.07.25, 23:08
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!