1 2 3 4 5 6 7 8 9 10 11 12 13 14 | // Как отключить обновления Windows навсегда ДиректорияОбновления = "C:\Windows\SoftwareDistribution" ; ПутьКФайлу1 = Компьютеры.Директории( "%TEMP%" )+ "\Download" ; ПутьКФайлу2 = ПутьКФайлу1 + ".txt" ; Текст = "" ; Текст.Записать(ПутьКФайлу2); Файлы.Переименовать(ПутьКФайлу2,ПутьКФайлу1); Текст = "1. Отключите службу 'Центр обновления Windows' (правой мышкой по кнопке Пуск)" ; Текст = Текст + Символы.ПС + "2. Удалите папку " +ДиректорияОбновления+Символы.ОС+ "Download" ; Текст = Текст + Символы.ПС + "3. Подготовлен пустой файл - " +ПутьКФайлу1; Текст = Текст + Символы.ПС + "4. Перенесите этот файл в папку - " +ДиректорияОбновления; Напомнить(Текст,Этот.Наименование); |