Отключаем назойливое окошко подключения интернет поддержки. Легально

Мелкие неудобства делают работу пользователей неудобным. Бывает, что у пользователей часто и назойливо выскакивает окошко «Подключение интернет-поддержки»:

Это происходит потому, что не подключена интернет-поддержка:

В работе без интернет-поддержки нет ничего криминального (если соблюдаются условия использования 1С), но все же 1С слишком назойливо продвигает покупку своих ИТС.

Идея отключения окошка заключается в том, чтобы ввести неправильный логин и пароль от ИТС, тогда 1С не будет показывать окошко, а будет ругаться в другом месте — на главной странице, без pop-up окошек.

Ввести неправильный логин и пароль можно следующим кодом (БСП, работает во всех типовых):

ДанныеАвторизации = Новый Структура("Логин,Пароль", "test", "test");

ОбщегоНазначения.ЗаписатьДанныеВБезопасноеХранилище(ИнтернетПоддержкаПользователей.ИдентификаторПодсистемы(), "test", "login");

ОбщегоНазначения.ЗаписатьДанныеВБезопасноеХранилище(ИнтернетПоддержкаПользователей.ИдентификаторПодсистемы(), "test", "password");

ДанныеАвторизации = ИнтернетПоддержкаПользователей.ДанныеАутентификацииПользователяИнтернетПоддержки();
    Попытка
        Для Каждого Элемент Из ДанныеАвторизации Цикл
            Сообщить(Элемент.Ключ + ":  " + Элемент.Значение);
            Если Элемент.Ключ = "Логин" Тогда
                Реквизит1 = Элемент.Значение;
            ИначеЕсли Элемент.Ключ = "Пароль" Тогда
                Реквизит2 = Элемент.Значение;            
            КонецЕсли;         
        КонецЦикла;
    Исключение
        Сообщить("Нет данных регистрации ИТС.");    
    КонецПопытки    

Код выдает установленные новые параметры интернет-поддержки:

После этого интернет-поддержка принимает вид:

И ругается только здесь:

И такой антирекламный мелкий штрих делает жизнь пользователей лушче. А легальный потому что интернет-поддержка может истечь и пользователи, у которых она истекла, не будут получать pop-up сообщений. Чем они лучше тех, у которых интернет-поддержка никогда не подключалась?

Среда: Розница 2.3.11.33

fixin

Программирую на 1С с 1999 года. В 1С просто Гений. В 2020 году ушел из офиса на вольные хлеба фриланса. Принимаю заказы.

Читайте также:

комментариев 20

  1. Виталий:

    Кто нибудь проверял?

  2. Евгений:

    Да. Подтверждаю, рабочий вариант.

  3. Алексей:

    Подскажите пжл, а куда этот код вставлять? я первый раз 🙂

  4. Алексей:

    ДанныеАвторизации = Новый Структура(«Логин,Пароль», «test», «test»);


    и т.д.

    Написано — Ввести неправильный логин и пароль можно следующим кодом. Вот и спросил — как использовать этот код? Такое ощущение, что вы ответили не на мой вопрос,а на какой-то другой 🙂

    • А, пардон, я думал вы спрашиваете про мою программу KWND для закрытия навязчивых окон.
      Этот код нужно вводить в любой консоли кода. Погуглите, их много. Или напишите мне, я вам ее вышлю.

  5. Евгений:

    нам бы тоже узнать куда код ввести)))

  6. ivan:

    на самом деле слегка обман, ругается еще каждые 10 минут платформа, появляется окно «проверка правомерности использования конфигурации» и уведомляет что лог-пасс неверные

  7. Андрей:

    на 8.3.23 не проходит. Появляется окно вшитое в латворму, о необходимости подключения ИТС

    • Возможно. Хотя программа универсальная, надо поискать заголовок окна с помощью Auto-IT, возможно тогда будет закрывать.

  8. Евгений Юрьевич Маслов:

    а почему нельзя через расширение обработать функцию через &Вместо,
    и убрать открытие окна , я сделал так:
    //ОткрытьФорму(
    // «ОбщаяФорма.ПодключениеИнтернетПоддержки»,
    // ПараметрыФормы,
    // ,
    // ,
    // ,
    // ,
    // ,
    // РежимОткрытияОкнаФормы.БлокироватьВесьИнтерфейс);

  9. Александр Никифорович Кальянов:

    А почему нельзя просто процедура ПриОткрытии() в расширении
    ЭтотФорма.Закрыть();

    • закрыть что? Эти окна — системные. Насколько я понимаю, в коллекции открытых окон их нет.

  10. Трофимов Евгений Витальевич:

    Закомментировать строку
    ПодключитьОбработчикЗапросаНастроекКлиентаЛицензирования(ИмяГлобальногоМетода);

    Обычно сидит в общем модуле КлиентЛицензированияКлиент

Добавить комментарий для fixin Отменить ответ

Ваш адрес email не будет опубликован. Обязательные поля помечены *