Отключение сеансов на кластерах серверов

15 Comments

1. Re:аниматор 04.05.2014 at 17:41

   1. Нет выбора версии 8.2 или 8.3

   Новый COMОбъект(«V82.COMConnector»);

   2. Нет множественного выбора пользователей при отключении, если надо 100 пользователей отключить …
   
   3. Не плохо бы добавить колонку «Захвачено СУБД» для отслеживания зависаний сеансов и тормозов в программе.

   Сеансы[Н].dbProcTook/1000;

   Reply ↓
2. monsta 04.05.2014 at 21:43

   Добавил множественный выбор и поддержку 8.3, с dbProcTook пока разбираюсь, спасибо за пожелания.

   Reply ↓
3. Re:аниматор 05.05.2014 at 03:58

   Платформа 8.3. Клиент серверный режим при открытии обработки

   {Форма.Форма.Форма(95)}: Поле объекта не обнаружено (Name)
   
   СтрокаКластера.ИмяКластера = Кластеры[Н].Name;
   

   Reply ↓
4. monsta 05.05.2014 at 09:33

   Поправил, сейчас должно работать.

   Reply ↓
5. 7OH 07.05.2014 at 18:56

   Есть несколько просьб:
   
   1. добавить отключение не только через правую мышку, но и через кнопки на форме.
   
   2. добавить в список — ВСЕ базы , чтобы можно было выгнать вообще всех.
   
   3. добавить фильтр или галки — полезно выгнать не всех по критерию.

   Reply ↓
6. monsta 07.05.2014 at 21:43

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

   Reply ↓
7. dmbal 10.05.2014 at 14:43

   Спасибо, полезная форма. Плюсую.
   
   Единственно — добавил только просмотр на все таблицы и в процедуре ИнициализироватьСписокСеансов()
   
   код
   

   СтрокаСеанса.ТипПодключения = Сеансы[Н].AppID;

   заменил на
   

   СтрокаСеанса.ТипПодключения = Сеансы[Н].AppID;
   Если СтрокаСеанса.ТипПодключения = «Designer» Тогда
   СтрокаСеанса.ТипПодключения = «Конфигуратор»;
   ИначеЕсли СтрокаСеанса.ТипПодключения = «1CV8» Тогда
   СтрокаСеанса.ТипПодключения = «Толстый клиент»;
   ИначеЕсли СтрокаСеанса.ТипПодключения = «1CV8C» Тогда
   СтрокаСеанса.ТипПодключения = «Тонкий клиент»;
   ИначеЕсли СтрокаСеанса.ТипПодключения = «WebClient» Тогда
   СтрокаСеанса.ТипПодключения = «Веб клиент»;
   КонецЕсли;
   

   Показать

   Так гораздо симпотичнее.

   Reply ↓
8. monsta 10.05.2014 at 17:08

   Хорошее замечание, выложил обновленную версию.
   
   За плюс спасибо.

   Reply ↓
9. Andry.Boris 11.05.2014 at 13:18

   Спасибо, плюсую…
   
   Возьму на заметку…

   Reply ↓
10. mikhailovaew 20.05.2014 at 15:51

    А отключение соединений там есть? При некорректном завершении работы пользователя его нет в сеансах, а соединение с пустым номером сеанса висит, удалить его средствами администрирования серверов 1С можно, но оно тут же «оживает».

    Reply ↓
11. monsta 21.05.2014 at 09:08

    Данная обработка является заменой консоли кластеров сервера 1С и работает по тем же принципам — не думаю что она будет отключать пользователей лучше, чем это делается через оснастку.

    Reply ↓
12. tehas 15.07.2014 at 15:45

    (7) dmbal, красивее будет использовать ПредставлениеПриложения(<ИмяПриложения>)

    Reply ↓
13. pt_olga 16.07.2014 at 12:51

    а если кластер не локальный, найдет и уничножит соединения? )

    Reply ↓
14. monsta 16.07.2014 at 16:17

    Разумеется

    Reply ↓
15. isn 07.12.2015 at 09:46

    Проблем с кластером серверов нет? У нас несколько серверов в кластере, периодически подвисание происходит на втором кластере происходит.

    Reply ↓