|
|
|
Evgen26809
Стаж: 7 лет Сообщений: 1
|
Evgen26809 ·
12-Янв-21 15:42
(3 года 11 месяцев назад)
Версия Kpoxa tweaker 1.4 готова
Спасибо за творчество
|
|
|
|
El Lobo
Стаж: 17 лет 11 месяцев Сообщений: 109
|
El Lobo ·
08-Фев-21 11:38
(спустя 26 дней)
После использования программы выключился центр уведомлений Windows и никак не включается обратно, какая именно опция за него отвечает?
|
|
|
|
KrenSan
Стаж: 11 лет 4 месяца Сообщений: 28
|
KrenSan ·
18-Фев-21 18:31
(спустя 10 дней)
антивирусы не пускают, вернуть по умолчанию не представляется возможным, оно надо?
|
|
|
|
adnext
Стаж: 16 лет 11 месяцев Сообщений: 40
|
adnext ·
19-Фев-21 12:08
(спустя 17 часов)
KrenSan
Вы бы для начала читали бы описание к программе, НО если вы на столько недалекий человек, вернуть по умолчанию очень просто, нажимаете ещё раз на твик и всё возвращается в дефолт!
Насчет антивирусы не пускают, - кроха с легкостью удаляет Защитника, который после заменяется на нормальный антивирус.
Поэтому и Ваш Защитник пытается не пустить, так как анализирует угрозу предстоящего удаления.
El Lobo
После использования программы выключился центр уведомлений Windows и никак не включается обратно, какая именно опция за него отвечает?
За центр уведомлений отвечают: службы центра обеспечения безопасности и Служба уведомлений.
|
|
|
|
KrenSan
Стаж: 11 лет 4 месяца Сообщений: 28
|
KrenSan ·
19-Фев-21 12:47
(спустя 39 мин.)
Уберите активатор, уберите отключалку антивируса! Будет детект меньше, будет больше пользователей.
На крайняк сделайте две версии, с этими функциями и без этих.
Функции нужные, задумка класс, но надо же испортить впечатление, блин, вы не грубите, сами же написали задавать вопросы и выдвигать предложения. Тяжело выслушивать критику, ничего, привыкайте, либо ваша программа не наберёт нужной вам популярности!
|
|
|
|
adnext
Стаж: 16 лет 11 месяцев Сообщений: 40
|
adnext ·
20-Фев-21 09:32
(спустя 20 часов, ред. 20-Фев-21 09:32)
Здравствуйте зачем же писать ересь о том, что откат невозможен?!
По пунктам:
0.Ругаются антивирусники, потому что я запускаю Кроху Твикер от имени администратора.
1.Активатор не причем я использую slc.dll в котором изменены пару байт, на эту либу антивирусы не реагируют.
2.Отключалка антивируса нужна, так как не раз замечено, что даже устанавливая каспера free, Защитник работает вместе с ним, а должен отключаться!
3.Ругаются антивирусы на TrastedInstaller, при помощи которого происходит отключение недоступных обычными средствами служб, функций, веток реестра...
4.Ругаются антивирусы, на команды: bcdedit.exe get-appxpackage -allusers |remove-appxpackage,
5.Ругаются антивирусники даже на почту которую я указал...
6.Ругаются антивирусы на политики, которые я применяю, чтобы отключить стучалки, хотя как я понимаю, людям лучше живется при стучалках.
7.Ругаются не популярные антивирусы, а китайские, почему наш народ верит им, непонятно.
ЗЫ Создайте пустой проект, с одним окном пустым, скомпилируйте, залейте на вирус тотал, итог- в программе тьма троянов, хотя проект пустой от слова совсем.
Программа открыта, расковыряйте и покажите мне участок кода, где трояны и вирусы и прочие зловреды.
KrenSan писал(а):
80957741вы не грубите, сами же написали задавать вопросы и выдвигать предложения.
Антивирусы не пускают, вернуть по умолчанию не представляется возможным, накуй но надо?
По Вашему это выдвигаемое предложение? 
|
|
|
|
inskra
Стаж: 16 лет Сообщений: 20
|
inskra ·
20-Фев-21 11:49
(спустя 2 часа 17 мин.)
Хорошая прога. молодца 
adnext писал(а):
вернуть по умолчанию очень просто, нажимаете ещё раз на твик и всё возвращается в дефолт!
Отключил службу поиска. Потом осознал что она мне нужна, галку убрал, но поиск так и не заработал.
Служба поиска WSearch не стартует, пишет ошибку 1058, типа она отключена.
|
|
|
|
adnext
Стаж: 16 лет 11 месяцев Сообщений: 40
|
adnext ·
20-Фев-21 12:20
(спустя 30 мин., ред. 20-Фев-21 12:20)
inskra
Ребут делали?
При изменении любой службы или твика после применения и возврата делайте ребут системы.
|
|
|
|
inskra
Стаж: 16 лет Сообщений: 20
|
inskra ·
20-Фев-21 12:35
(спустя 15 мин., ред. 20-Фев-21 12:35)
adnext писал(а):
80963279inskra
Ребут делали?
При изменении любой службы или твика после применения и возврата делайте ребут системы.
Да, конечно.
Возможно ей мешает запуститься другая выключенная служба. Но в зависимостях они включены и работают.
Не хватает в программе, вернуть настройки по умолчанию.
|
|
|
|
adnext
Стаж: 16 лет 11 месяцев Сообщений: 40
|
adnext ·
20-Фев-21 12:56
(спустя 21 мин., ред. 20-Фев-21 12:56)
Откатите все службы, в будущей 1.4.1 я сделаю зависимость служб и большее отключение чем в 1.4
Спасибо, что заметили.
"WSearch" авто
"fhsvc" вручную
"WMPNetworkSvc" вручную
"workfolderssvc" вручную
Привожу список зависимых служб
|
|
|
|
inskra
Стаж: 16 лет Сообщений: 20
|
inskra ·
20-Фев-21 13:19
(спустя 22 мин.)
adnext писал(а):
80963521Откатите все службы, в будущей 1.4.1 я сделаю зависимость служб и большее отключение чем в 1.4
Спасибо, что заметили.
"WSearch" авто
"fhsvc" вручную
"WMPNetworkSvc" вручную
"workfolderssvc" вручную
Привожу список зависимых служб
Проверил в реестре они стоят с параметром запуска 3
Я могу ошибаться, но по моему, наоборот, эти службы зависят от WSearch.
|
|
|
|
y6uTb_6blDJlo
Стаж: 3 года 10 месяцев Сообщений: 239
|
y6uTb_6blDJlo ·
07-Мар-21 15:05
(спустя 15 дней, ред. 07-Мар-21 15:05)
Практически то же самое, что и Win10 Tweaker, только там на VirusTotal срабатываний в 2 раза больше, а тут пока 23. А так обе удобные, аналогов пока не нашел.
|
|
|
|
scoolo
Стаж: 13 лет 5 месяцев Сообщений: 14
|
scoolo ·
01-Апр-21 23:39
(спустя 25 дней)
А можете еще профили добавить, что бы сохранять мог и редактировать. И что бы можно было в "Мой компьютер" вот такие штуки добавлять
|
|
|
|
KisPavVlad1
Стаж: 3 года 9 месяцев Сообщений: 19
|
KisPavVlad1 ·
04-Апр-21 09:31
(спустя 2 дня 9 часов, ред. 04-Апр-21 09:31)
Здравствуйте.
Несколько твиков контекстного меню без промелькивания командного окна при запуске.
Может пригодится:
скрытый текст
Windows Registry Editor Version 5.00
[HKEY_CLASSES_ROOT\*\shell\owner]
@="Стать владельцем и задать полный доступ к объекту"
"HasLUAShield"=""
"NoWorkingDirectory"=""
[HKEY_CLASSES_ROOT\*\shell\owner\command]
@="mshta.exe vbscript:close(createobject(\"shell.application\").shellexecute(\"cmd.exe\",\"/c takeown /f \"\"%1\"\" && icacls \"\"%1\"\" /grant:r \"\"%%USERDOMAIN%%\\%%USERNAME%%\"\":F /c\",\"\",\"runas\",1))"
"IsolatedCommand"="mshta.exe vbscript:close(createobject(\"shell.application\").shellexecute(\"cmd.exe\",\"/c takeown /f \"\"%1\"\" && icacls \"\"%1\"\" /grant:r \"\"%%USERDOMAIN%%\\%%USERNAME%%\"\":F /c\",\"\",\"runas\",1))"
[HKEY_CLASSES_ROOT\Directory\shell\owner]
@="Стать владельцем и задать полный доступ к объекту"
"HasLUAShield"=""
"NoWorkingDirectory"=""
[HKEY_CLASSES_ROOT\Directory\shell\owner\command]
@="mshta.exe vbscript:close(createobject(\"shell.application\").shellexecute(\"cmd.exe\",\"/c takeown /f \"\"%1\"\" /r /d y && icacls \"\"%1\"\" /grant:r \"\"%%USERDOMAIN%%\\%%USERNAME%%\"\":F /t /c\",\"\",\"runas\",1))"
"IsolatedCommand"="mshta.exe vbscript:close(createobject(\"shell.application\").shellexecute(\"cmd.exe\",\"/c takeown /f \"\"%1\"\" /r /d y && icacls \"\"%1\"\" /grant:r \"\"%%USERDOMAIN%%\\%%USERNAME%%\"\":F /t /c\",\"\",\"runas\",1))"
[HKEY_CLASSES_ROOT\DesktopBackground\shell\ShowHideFiles]
"MUIVerb"="Показать/Скрыть скрытые файлы и папки"
"Icon"="shell32.dll,-253"
[HKEY_CLASSES_ROOT\DesktopBackground\shell\ShowHideFiles\command]
@="mshta.exe vbscript:createobject(\"wscript.shell\").run(\"cmd.exe /q /d /c for /f \"\"tokens=2,*\"\" %%i in ('reg query HKCR\\DesktopBackground\\shell\\ShowHideFiles\\command /v execute') do %%j\",0)(close)"
"execute"="cmd.exe /q /d /c (for /f \"tokens=3,*\" %a in ('reg query HKCU\\Software\\Microsoft\\Windows\\CurrentVersion\\Explorer\\Advanced /v Hidden') do if \"%a\"==\"0x2\" ((reg add HKCU\\Software\\Microsoft\\Windows\\CurrentVersion\\Explorer\\Advanced /v Hidden /t REG_DWORD /d 1 /f) & (reg add HKCU\\Software\\Microsoft\\Windows\\CurrentVersion\\Explorer\\Advanced /v ShowSuperHidden /t REG_DWORD /d 1 /f)) else ((reg add HKCU\\Software\\Microsoft\\Windows\\CurrentVersion\\Explorer\\Advanced /v Hidden /t REG_DWORD /d 2 /f) & (reg add HKCU\\Software\\Microsoft\\Windows\\CurrentVersion\\Explorer\\Advanced /v ShowSuperHidden /t REG_DWORD /d 0 /f))) & (taskkill /f /im explorer.exe && start explorer.exe)"
[HKEY_CLASSES_ROOT\DesktopBackground\shell\TrayNotify]
"MUIVerb"="Очистка области уведомлений"
"Icon"="shell32.dll,-1001"
"Position"="Top"
[HKEY_CLASSES_ROOT\DesktopBackground\shell\TrayNotify\command]
@="mshta.exe vbscript:createobject(\"wscript.shell\").run(\"cmd.exe /q /d /c taskkill /f /im explorer.exe & (for %%i in (\"\"HKCU\\Software\\Classes\\Local Settings\\Software\\Microsoft\\Windows\\CurrentVersion\\TrayNotify\"\") do (reg delete \"\"%~i\"\" /f /v IconStreams) & (reg delete \"\"%~i\"\" /f /v PastIconsStream)) & timeout /t 2 & start explorer.exe\",0)(close)"
[HKEY_CLASSES_ROOT\DesktopBackground\Shell\CleanCache]
"MUIVerb"="Очистка кэша иконок и эскизов"
"Icon"="shell32.dll,-63009"
"Position"="Top"
"SubCommands"=""
[HKEY_CLASSES_ROOT\DesktopBackground\Shell\CleanCache\shell\01Icons]
"MUIVerb"="Очистка кэша иконок"
"Icon"="shell32.dll,-63009"
[HKEY_CLASSES_ROOT\DesktopBackground\Shell\CleanCache\shell\01Icons\command]
@="mshta.exe vbscript:createobject(\"wscript.shell\").run(\"cmd.exe /q /d /c taskkill /f /im explorer.exe & (del /q /a \"\"%%userprofile%%\\AppData\\Local\\IconCache.db\"\") & timeout /t 2 & start explorer.exe\",0)(close)"
[HKEY_CLASSES_ROOT\DesktopBackground\Shell\CleanCache\shell\02Thumbnails]
"MUIVerb"="Очистка кэша эскизов"
"Icon"="shell32.dll,-63008"
[HKEY_CLASSES_ROOT\DesktopBackground\Shell\CleanCache\shell\02Thumbnails\command]
@="mshta.exe vbscript:createobject(\"wscript.shell\").run(\"cmd.exe /q /d /c taskkill /f /im explorer.exe & (del /q /a /s \"\"%%userprofile%%\\AppData\\Local\\Microsoft\\Windows\\Explorer\\*.db\"\") & timeout /t 2 & start explorer.exe\",0)(close)"
[HKEY_CLASSES_ROOT\Directory\Background\shell\RestartExplorer]
"MUIVerb"="Перезапуск проводника"
"Icon"="explorer.exe"
[HKEY_CLASSES_ROOT\Directory\Background\shell\RestartExplorer\command]
@="mshta.exe vbscript:createobject(\"wscript.shell\").run(\"cmd.exe /q /d /c taskkill /f /im explorer.exe && start explorer.exe\",0)(close)"
[HKEY_CLASSES_ROOT\DesktopBackground\Shell\Shutdown]
"MUIVerb"="Завершение работы или перезагрузка системы"
"Icon"="shell32.dll,-28"
"Position"="Bottom"
"SubCommands"=""
[HKEY_CLASSES_ROOT\DesktopBackground\Shell\Shutdown\shell\01ShutdownInstantly]
"MUIVerb"="Завершение работы"
"Icon"="shell32.dll,-28"
[HKEY_CLASSES_ROOT\DesktopBackground\Shell\Shutdown\shell\01ShutdownInstantly\command]
@="mshta.exe vbscript:createobject(\"wscript.shell\").run(\"cmd.exe /c shutdown -s -f -t 0\",0)(close)"
[HKEY_CLASSES_ROOT\DesktopBackground\Shell\Shutdown\shell\02RestartInstantly]
"MUIVerb"="Перезагрузка"
"Icon"="shell32.dll,-16739"
[HKEY_CLASSES_ROOT\DesktopBackground\Shell\Shutdown\shell\02RestartInstantly\command]
@="mshta.exe vbscript:createobject(\"wscript.shell\").run(\"cmd.exe /c shutdown -r -f -t 0\",0)(close)"
[HKEY_CLASSES_ROOT\DesktopBackground\Shell\Shutdown\shell\03RestartAdvancedInstantly]
"CommandFlags"=dword:00000020
"MUIVerb"="Перезагрузка в расширенном режиме"
"Icon"="shell32.dll,-16739"
[HKEY_CLASSES_ROOT\DesktopBackground\Shell\Shutdown\shell\03RestartAdvancedInstantly\command]
@="mshta.exe vbscript:createobject(\"wscript.shell\").run(\"cmd.exe /c shutdown -r -o -f -t 0\",0)(close)"
|
|
|
|
KisPavVlad1
Стаж: 3 года 9 месяцев Сообщений: 19
|
KisPavVlad1 ·
11-Апр-21 16:41
(спустя 7 дней, ред. 15-Апр-21 18:34)
Здравствуйте. Народ, а кто скажет, этот форум ещё осуждается по КРОХА, или неактуален? Есть надежда увидеть обсуждения, или только на RU-BOARD ?
|
|
|
|
KisPavVlad1
Стаж: 3 года 9 месяцев Сообщений: 19
|
KisPavVlad1 ·
14-Май-21 20:51
(спустя 1 месяц 3 дня)
Похоже тема мёртвая. Никаких движух нет. На форумах всегда должна быть хоть какая то, но движуха. Очень жаль.
|
|
|
|
vanasha20
Стаж: 15 лет Сообщений: 546
|
vanasha20 ·
16-Май-21 15:12
(спустя 1 день 18 часов)
1.4.1 BETA2
Изменения в версии:
скрытый текст
1. Во вкладке Система переделан чекбокс по Активации Windows внизу на кнопку.
При нажатии появляется сообщение, продолжать или отказаться от применения.
Возможно с первого раза не получится активировать, можно ещё раз повторить.
При удачном завершении активации появится соответствующее окно о сроке активации.
2. Во вкладке Безопасность добавлена внизу кнопка на отключение/включение защитника.
Работает как ключ в реальном времени, попутно можно отключить и другие приложения.
Если необходимо его выпилить, то это можно сделать во вкладке Фоновые приложения.
При нажатии на кнопку появляется панель с твиками, которые выполняются при нажатии.
При повторном нажатии кнопки панель скрывается, цвет фона окна панели изменён.
3. Во вкладках Интерфейс и Контекстное меню откорректированы разные твики.
Желательно перед применением этой версии Контекстного меню сделать откат всех твиков на предыдущей версии,
что в шапке темы, а уже на этой версии вновь их повторно применить.
4. Во вкладке Службы Windows откорректированы функции, служба APPX исключена из отключения.
Все службы по отключению и количеству соответствуют применённым данным.
5. Во вкладке Фоновые приложения тоже переделан верхний чекбокс на кнопку.
При нажатии каждой кнопки появляется сообщение о продолжении конкретной операции.
Добавлена вверху кнопка Применить, которая действует сразу на множество приложений.
Сделана возможность сначала пометить не нужные приложения, а затем уже нажать Применить.
При завершении операций будет выведено соответствующее сообщение об окончании процесса.
Отдельно выполняются удаления без кнопки Применить через чекбоксы на эти приложения -
Cortana, Поиск, OneDrive, Защитник. Эти чекбоксы работают как и раньше, но с
предварительным предупреждением на конкретные действия.
Если обрабатываем систему 10 с 20H2 с раздельным Поиском чекбоксами Cortana и Поиск,
то соответствующие приложения раздельно будут удалены.
Если с совместным поиском на системах 10 до 20H2, то при выполнении Поиск будут выпилены Cortana и Поиск.
При выполнении Cortana будет предложено на выбор отключить или удалить, если удалить, то удаляется вместе с Поиском.
При отключении возможно сразу её включить повторным нажатием этого чекбокса.
Чекбокс OneDrive позволяет частично удалить или выпилить, есть возможность повторной
установки после удаления с возможностью загрузки с сайта при наличии Интернета.
Чекбокс Защитник работает на полное его удаление без возможности возврата.
Перед применением тоже появляется сообщение о выборе дальнейших действий.
Если необходимо как ключом пользоваться отключением/включением, то во вкладке
Безопасность, тут отображается только его состояние на основании тех действий.
6. Добавлена вкладка Сервис, в которой пока три чекбокса - на отключение файла гибернации,
на перенос системных и пользовательских переменных в папку Temp, которая создаётся в корне системного раздела
и на отключение файла подкачки. Есть возможность отката на изначальные системные данные.
7. Добавлена кнопка Инфо ниже логотипа, в которую перенесена информация о программе.
С окна логотипа эта информация по нажатию мышки убрана с выводом по нажатию кнопки.
Хотел сделать на кнопку всплывающую панель с выводом информации, что-то не работает.
Если поместить эту кнопку в любую вкладку, то всё нормально работает, отсюда никак.
Пока оставил как есть, потом возможно переделаю на вывод информации через панель.
Просто не хотелось добавлять в конец лишнюю эту вкладку Инфо после вкладки Сервис.
8. Во всех имеющихся панелях во всех вкладках изменён цвет фона на более приятный.
В конкретной вкладке, где есть несколько панелей, сделана возможность открытия только
одной, предыдущая открытая автоматом закрывается при открытии следующей.
Исправлены разные ошибки в кодах и мелкие неточности во всплывающих подсказках.
Перед нажатием конкретного твика читайте внимательно всплывающие подсказки.
|
|
|
|
KisPavVlad1
Стаж: 3 года 9 месяцев Сообщений: 19
|
KisPavVlad1 ·
16-Май-21 16:39
(спустя 1 час 26 мин.)
vanasha20 писал(а):
814331011.4.1 BETA2
Изменения в версии:
скрытый текст
1. Во вкладке Система переделан чекбокс по Активации Windows внизу на кнопку.
При нажатии появляется сообщение, продолжать или отказаться от применения.
Возможно с первого раза не получится активировать, можно ещё раз повторить.
При удачном завершении активации появится соответствующее окно о сроке активации.
2. Во вкладке Безопасность добавлена внизу кнопка на отключение/включение защитника.
Работает как ключ в реальном времени, попутно можно отключить и другие приложения.
Если необходимо его выпилить, то это можно сделать во вкладке Фоновые приложения.
При нажатии на кнопку появляется панель с твиками, которые выполняются при нажатии.
При повторном нажатии кнопки панель скрывается, цвет фона окна панели изменён.
3. Во вкладках Интерфейс и Контекстное меню откорректированы разные твики.
Желательно перед применением этой версии Контекстного меню сделать откат всех твиков на предыдущей версии,
что в шапке темы, а уже на этой версии вновь их повторно применить.
4. Во вкладке Службы Windows откорректированы функции, служба APPX исключена из отключения.
Все службы по отключению и количеству соответствуют применённым данным.
5. Во вкладке Фоновые приложения тоже переделан верхний чекбокс на кнопку.
При нажатии каждой кнопки появляется сообщение о продолжении конкретной операции.
Добавлена вверху кнопка Применить, которая действует сразу на множество приложений.
Сделана возможность сначала пометить не нужные приложения, а затем уже нажать Применить.
При завершении операций будет выведено соответствующее сообщение об окончании процесса.
Отдельно выполняются удаления без кнопки Применить через чекбоксы на эти приложения -
Cortana, Поиск, OneDrive, Защитник. Эти чекбоксы работают как и раньше, но с
предварительным предупреждением на конкретные действия.
Если обрабатываем систему 10 с 20H2 с раздельным Поиском чекбоксами Cortana и Поиск,
то соответствующие приложения раздельно будут удалены.
Если с совместным поиском на системах 10 до 20H2, то при выполнении Поиск будут выпилены Cortana и Поиск.
При выполнении Cortana будет предложено на выбор отключить или удалить, если удалить, то удаляется вместе с Поиском.
При отключении возможно сразу её включить повторным нажатием этого чекбокса.
Чекбокс OneDrive позволяет частично удалить или выпилить, есть возможность повторной
установки после удаления с возможностью загрузки с сайта при наличии Интернета.
Чекбокс Защитник работает на полное его удаление без возможности возврата.
Перед применением тоже появляется сообщение о выборе дальнейших действий.
Если необходимо как ключом пользоваться отключением/включением, то во вкладке
Безопасность, тут отображается только его состояние на основании тех действий.
6. Добавлена вкладка Сервис, в которой пока три чекбокса - на отключение файла гибернации,
на перенос системных и пользовательских переменных в папку Temp, которая создаётся в корне системного раздела
и на отключение файла подкачки. Есть возможность отката на изначальные системные данные.
7. Добавлена кнопка Инфо ниже логотипа, в которую перенесена информация о программе.
С окна логотипа эта информация по нажатию мышки убрана с выводом по нажатию кнопки.
Хотел сделать на кнопку всплывающую панель с выводом информации, что-то не работает.
Если поместить эту кнопку в любую вкладку, то всё нормально работает, отсюда никак.
Пока оставил как есть, потом возможно переделаю на вывод информации через панель.
Просто не хотелось добавлять в конец лишнюю эту вкладку Инфо после вкладки Сервис.
8. Во всех имеющихся панелях во всех вкладках изменён цвет фона на более приятный.
В конкретной вкладке, где есть несколько панелей, сделана возможность открытия только
одной, предыдущая открытая автоматом закрывается при открытии следующей.
Исправлены разные ошибки в кодах и мелкие неточности во всплывающих подсказках.
Перед нажатием конкретного твика читайте внимательно всплывающие подсказки.
|
|
|
|
KisPavVlad1
Стаж: 3 года 9 месяцев Сообщений: 19
|
KisPavVlad1 ·
02-Июн-21 23:33
(спустя 17 дней, ред. 02-Июн-21 23:33)
Уже БЕТА 3 есть и получше чем 2. Неужели действительно здесь нельзя организовать нормальное обсуждение? Тема вроде официальная, но мёртвая. Я уж побаиваюсь с автором всё в порядке, никто не в курсе?
Твик контекстного меню отключения-включения интернета:
Windows Registry Editor Version 5.00
[HKEY_CLASSES_ROOT\DesktopBackground\Shell\InternetOffOn]
"MUIVerb"="Отключить/Включить интернет"
"Icon"="netcenter.dll,-19"
"SubCommands"=""
[HKEY_CLASSES_ROOT\DesktopBackground\Shell\InternetOffOn\shell\01Off]
"MUIVerb"="Отключить интернет"
"Icon"="netcenter.dll,-14"
[HKEY_CLASSES_ROOT\DesktopBackground\Shell\InternetOffOn\shell\01Off\command]
@="mshta.exe vbscript:close(CreateObject(\"Shell.Application\").ShellExecute(\"cmd.exe\",\"/q /d /c for /f \"\"skip=2 tokens=3,*\"\" %%a in ('netsh interface show interface') do netsh interface set interface name=\"\"%%b\"\" disable\",\"\",\"runas\",0))"
[HKEY_CLASSES_ROOT\DesktopBackground\Shell\InternetOffOn\shell\02On]
"MUIVerb"="Включить интернет"
"Icon"="netcenter.dll,-19"
[HKEY_CLASSES_ROOT\DesktopBackground\Shell\InternetOffOn\shell\02On\command]
@="mshta.exe vbscript:close(CreateObject(\"Shell.Application\").ShellExecute(\"cmd.exe\",\"/q /d /c for /f \"\"skip=2 tokens=3,*\"\" %%a in ('netsh interface show interface') do netsh interface set interface name=\"\"%%b\"\" enable\",\"\",\"runas\",0))"
---------------------------------------------------------------------------------------------------
Вариант того же твика, только в один пункт:
Windows Registry Editor Version 5.00
[HKEY_CLASSES_ROOT\DesktopBackground\Shell\InternetOffOn]
"MUIVerb"="Отключить/Включить интернет"
"Icon"="netcenter.dll,-19"
"Position"="Middle"
[HKEY_CLASSES_ROOT\DesktopBackground\Shell\InternetOffOn\command]
@="mshta.exe vbscript:close(CreateObject(\"Shell.Application\").ShellExecute(\"cmd.exe\",\" /q /d /c (for /f \"\"tokens=2,*\"\" %%i in ('reg query HKCR\\DesktopBackground\\Shell\\InternetOffOn\\command /v execute') do %%j)\",\"\",\"runas\",0))"
"execute"="cmd.exe /q /d /c (for /f \"tokens=2 delims==\" %i in ('\"WMIC.exe PATH Win32_NetworkAdapter WHERE (PNPDeviceID LIKE \"USB\\\\VID%%\" OR PNPDeviceID LIKE \"PCI\\\\VEN%%\") GET NetConnectionID /VALUE 2>nul\"') do (for /f \"delims=\" %k in (\"%i\") do (for /f \"tokens=2 delims==\" %a in ('\"WMIC.exe PATH Win32_NetworkAdapter WHERE NetConnectionID=\"%k\" GET NetConnectionStatus /VALUE 2>nul\"') do (for /f \"delims=\" %b in (\"%a\") do if \"%b\" EQU \"2\" (netsh interface set interface name=\"%k\" disable) else (if \"%b\" EQU \"0\" netsh interface set interface name=\"%k\" enable)))))"
|
|
|
|
KisPavVlad1
Стаж: 3 года 9 месяцев Сообщений: 19
|
KisPavVlad1 ·
14-Июн-21 20:34
(спустя 11 дней, ред. 14-Июн-21 20:34)
Твик контектсного меню запрещения и разрешения доступа приложений в инет:
Windows Registry Editor Version 5.00
;Запретить/Разрешить доступ в интернет. Windows Xp, Vista, 7, 8, 8.1, 10.
[HKEY_CLASSES_ROOT\exefile\shell\Firewall_BlockAllow]
"MUIVerb"="Запретить/Разрешить доступ в интернет"
"Icon"="imageres.dll,-105"
"SubCommands"=""
[HKEY_CLASSES_ROOT\exefile\shell\Firewall_BlockAllow\shell\01Block]
@="Запретить доступ в интернет"
"icon"="imageres.dll,-105"
[HKEY_CLASSES_ROOT\exefile\shell\Firewall_BlockAllow\shell\01Block\command]
@="mshta.exe vbscript:close(CreateObject(\"Shell.Application\").ShellExecute(\"cmd.exe\",\"/q /d /c (for /f \"\"tokens=2,*\"\" %%i in ('reg query \"\"HKCR\\exefile\\shell\\Firewall_BlockAllow\\shell\\01Block\\command\"\" /v execute') do set \"\"$=%1\"\" & cmd.exe /q /d /c %%j)\",\"\",\"runas\",0))"
"execute"="for /f \"tokens=*\" %a in (\"%$%\") do netsh advfirewall firewall add rule name=\"%~na\" dir=out action=block program=\"%~a\" & netsh advfirewall firewall add rule name=\"%~na\" dir=in action=block program=\"%~a\""
[HKEY_CLASSES_ROOT\exefile\shell\Firewall_BlockAllow\shell\02Allow]
"MUIVerb"="Разрешить доступ в интернет"
"icon"="imageres.dll,-106"
[HKEY_CLASSES_ROOT\exefile\shell\Firewall_BlockAllow\shell\02Allow\command]
@="mshta.exe vbscript:close(CreateObject(\"Shell.Application\").ShellExecute(\"cmd.exe\",\"/q /d /c (for /f \"\"tokens=2,*\"\" %%i in ('reg query \"\"HKCR\\exefile\\shell\\Firewall_BlockAllow\\shell\\02Allow\\command\"\" /v execute') do set \"\"$=%1\"\" & cmd.exe /q /d /c %%j)\",\"\",\"runas\",0))"
"execute"="for /f \"tokens=*\" %a in (\"%$%\") do netsh advfirewall firewall delete rule name=\"%~na\""
[HKEY_CLASSES_ROOT\lnkfile\shell\Firewall_BlockAllow]
"MUIVerb"="Запретить/Разрешить доступ в интернет"
"Icon"="imageres.dll,-105"
"SubCommands"=""
[HKEY_CLASSES_ROOT\lnkfile\shell\Firewall_BlockAllow\shell\01Block]
@="Запретить доступ в интернет"
"icon"="imageres.dll,-105"
[HKEY_CLASSES_ROOT\lnkfile\shell\Firewall_BlockAllow\shell\01Block\command]
@="mshta.exe vbscript:close(CreateObject(\"Shell.Application\").ShellExecute(\"cmd.exe\",\"/q /d /c (for /f \"\"tokens=2,*\"\" %%i in ('reg query \"\"HKCR\\lnkfile\\shell\\Firewall_BlockAllow\\shell\\01Block\\command\"\" /v execute') do set \"\"$=%1\"\" & cmd.exe /q /d /c %%j)\",\"\",\"runas\",0))"
"execute"="for /f \"tokens=2 delims==\" %a in ('\"wmic path win32_shortcutfile where name=\"%$:\\=\\\\%\" get target /value\"') do for /f \"delims=\" %b in (\"%~a\") do netsh advfirewall firewall add rule name=\"%~nb\" dir=out action=block program=\"%~b\" & netsh advfirewall firewall add rule name=\"%~nb\" dir=in action=block program=\"%~b\""
[HKEY_CLASSES_ROOT\lnkfile\shell\Firewall_BlockAllow\shell\02Allow]
"MUIVerb"="Разрешить доступ в интернет"
"icon"="imageres.dll,-106"
[HKEY_CLASSES_ROOT\lnkfile\shell\Firewall_BlockAllow\shell\02Allow\command]
@="mshta.exe vbscript:close(CreateObject(\"Shell.Application\").ShellExecute(\"cmd.exe\",\"/q /d /c (for /f \"\"tokens=2,*\"\" %%i in ('reg query \"\"HKCR\\lnkfile\\shell\\Firewall_BlockAllow\\shell\\02Allow\\command\"\" /v execute') do set \"\"$=%1\"\" & cmd.exe /q /d /c %%j)\",\"\",\"runas\",0))"
"execute"="for /f \"tokens=2 delims==\" %a in ('\"wmic path win32_shortcutfile where name=\"%$:\\=\\\\%\" get target /value\"') do for /f \"delims=\" %b in (\"%~a\") do netsh advfirewall firewall delete rule name=\"%~nb\""
|
|
|
|
devilson123
Стаж: 15 лет 5 месяцев Сообщений: 164
|
devilson123 ·
18-Июн-21 14:17
(спустя 3 дня, ред. 18-Июн-21 14:17)
О Боги, времена адекватного кода, маленьких программ, и олдскула не прошли !!
было бы круто иметь возможность сохранять варианты конфигурации (по многим причинам, в том числе откаты, и пробы разных конфигураций)
|
|
|
|
KisPavVlad1
Стаж: 3 года 9 месяцев Сообщений: 19
|
KisPavVlad1 ·
18-Июн-21 20:21
(спустя 6 часов, ред. 19-Июн-21 12:49)
devilson123 писал(а):
81585126О Боги, времена адекватного кода, маленьких программ, и олдскула не прошли !!
было бы круто иметь возможность сохранять варианты конфигурации (по многим причинам, в том числе откаты, и пробы разных конфигураций)
Варианты конфигурации нет, но откат есть. Уже всё делается, только здесь мёртвая тема почему то, хоть и авторская. На другом форуме всё обсуждается и потихоньку делается.
|
|
|
|
y6uTb_6blDJlo
Стаж: 3 года 10 месяцев Сообщений: 239
|
y6uTb_6blDJlo ·
19-Июн-21 12:28
(спустя 16 часов)
KisPavVlad1 писал(а):
81588881
devilson123 писал(а):
81585126О Боги, времена адекватного кода, маленьких программ, и олдскула не прошли !!
было бы круто иметь возможность сохранять варианты конфигурации (по многим причинам, в том числе откаты, и пробы разных конфигураций)
Варианты конфигурации нет, но откат есть. Уже всё делается, только здесь мёртвая тема почему то, хоть и авторская. На другом форуме всё обсуждается и потихоньку делается.
на каком форуме?
|
|
|
|
KisPavVlad1
Стаж: 3 года 9 месяцев Сообщений: 19
|
KisPavVlad1 ·
20-Июн-21 08:18
(спустя 19 часов, ред. 20-Июн-21 08:18)
y6uTb_6blDJlo писал(а):
81591302
KisPavVlad1 писал(а):
81588881
devilson123 писал(а):
81585126О Боги, времена адекватного кода, маленьких программ, и олдскула не прошли !!
было бы круто иметь возможность сохранять варианты конфигурации (по многим причинам, в том числе откаты, и пробы разных конфигураций)
Варианты конфигурации нет, но откат есть. Уже всё делается, только здесь мёртвая тема почему то, хоть и авторская. На другом форуме всё обсуждается и потихоньку делается.
на каком форуме?
Не скажу. Если потянете народ сюда, то скажу. Нужно оживлять авторскую тему. Сам автор давно .УЙ ЗАБЕЙ НА СВОЮ ПРОГУ. Там другой чел взялся делать.
|
|
|
|
len241
Стаж: 4 года 1 месяц Сообщений: 616
|
len241 ·
27-Июн-21 15:42
(спустя 7 дней)
adnext писал(а):
79144623
lordzia писал(а):
79142611не считывает уже настроенные параметры - это не удобно
Я не заставляю ей пользоваться.
спасибо, что не заставляешь !
|
|
|
|
KisPavVlad1
Стаж: 3 года 9 месяцев Сообщений: 19
|
KisPavVlad1 ·
02-Окт-21 07:41
(спустя 3 месяца 4 дня)
Новоиспечённая бэта-версия - https://disk.yandex.ru/d/P8uJG8N6WZoozg
Стала намного лучше.
+++++
|
|
|
|
overman2008
Стаж: 16 лет 5 месяцев Сообщений: 106
|
overman2008 ·
17-Окт-21 11:03
(спустя 15 дней)
было бы хорошо сохранять свои настройки приложения чтобы при запуске на новом компе выбрать профиль и сразу все настройки проставились и обработались.
|
|
|
|
KisPavVlad1
Стаж: 3 года 9 месяцев Сообщений: 19
|
KisPavVlad1 ·
28-Ноя-21 19:44
(спустя 1 месяц 11 дней)
Народ. Можете не ждать финальную версию и тем более здесь. Её похерили конкретно. Основной автор слился, а модернизацию штампуют только БЭТЫ и то всё в ошибках.
|
|
|
|
KisPavVlad1
Стаж: 3 года 9 месяцев Сообщений: 19
|
KisPavVlad1 ·
29-Май-22 07:14
(спустя 6 месяцев)
Автор и его последователь слились. Новой версии твикера не будет.
|
|
|
|
CEBEPOMOPCK
Стаж: 13 лет 4 месяца Сообщений: 5
|
CEBEPOMOPCK ·
18-Сен-22 19:48
(спустя 3 месяца 20 дней, ред. 18-Сен-22 19:48)
|
|
|
|
