Как выгнать пользователей в 1С 8.3 ЗУП 3.1

Всем здравствуйте.
Собственно вопрос как выгнать пользователей в 1С 8.3 ЗУП 3.1?
Стандартная выгонялка не работает. Соединение не разрывается...

&НаКлиенте

// ПриОткрытии()
//
Процедура ПриОткрытии(Отказ)

    Попытка
        КОМ        = Новый COMОбъект("V83.COMConnector");
        Агент        = КОМ.ConnectAgent(СокрЛП("BUH-APP"));
        Кластеры    = Агент.GetClusters();
        Кластер        = Кластеры.GetValue(0);
        Агент.Authenticate(Кластер, "", "");
        РабочиеПроцессы    = Агент.GetWorkingProcesses(Кластер);
        Для Каждого Процесс Из РабочиеПроцессы Цикл
            СтрокаСоединенияРП    = Процесс.HostName + ":" + Формат(Процесс.MainPort, "ЧГ=");
            СоединениеРП        = КОМ.ConnectWorkingProcess(СтрокаСоединенияРП);
            СоединениеРП.AddAuthentication(СокрЛП("AutoSave"), СокрЛП("111"));
            ОписаниеИБ = СоединениеРП.CreateInfoBaseInfo();
            ОписаниеИБ.Name = "zup_31";
            Соединения = СоединениеРП.GetInfoBaseConnections(ОписаниеИБ);
            Для Каждого Соединение Из Соединения Цикл
                Если Соединение.AppID = "COMConsole" Тогда
                    Продолжить;
                КонецЕсли;
                Если Найти(Соединение.userName, "AutoSave") = 0 Тогда
                    СоединениеРП.Disconnect(Соединение);
                КонецЕсли;
            КонецЦикла;
        КонецЦикла;
        КОМ = Неопределено;
        ЗавершитьРаботуСистемы(Ложь);
    Исключение
        Стр = ОписаниеОшибки();
        Сообщить("" + Стр);
    КонецПопытки;

КонецПроцедуры    // ПриОткрытии