2 скрипта для быстрого изменения настроек прокси в Windows 10

Вручную в Windows 10 переключать настройки прокси в браузере достаточно неудобно и медленно. Чтобы сэкономить время, вы можете использовать скрипты.

Proxy-сервер — это промежуточный узел между вашим компьютером и интернетом. Фактически, прокси — один из способов обеспечить анонимность и получить доступ к заблокированным сайтам. Не самый надёжный, конечно, но иногда спасающий.

Я рассмотрю всего два скрипта, причём для их создания и включение не понадобиться каких-то знаний программирования. А сами сервера ищите на просторах интернета, благо, что их много и они постоянно обновляются.

1. Включение заранее заданного прокси-сервера

Этот скрипт откроет окно с сообщением о необходимости установки прокси-сервера. Если ответить «Да», то скрипт сразу включит настройку и установит заранее заданный прокси-сервер.

Можно наделать таких скриптов на чаще всего используемые прокси и быстро переключаться.

Итак, сам скрипт. Скопируйте и вставьте текст в чистый файл Блокнота. Здесь вам придётся заменить адрес и порт http://www.youareanonymous.com:80 на свои:

Option Explicit
Dim valUserIn
Dim objShell, RegLocate, RegLocate1
Set objShell = WScript.CreateObject("WScript.Shell")
On Error Resume Next
valUserIn = MsgBox("Use A Cloaked Proxy?",4,"Cloaked Select")
If valUserIn=vbYes Then
RegLocate = "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyServer"
objShell.RegWrite RegLocate,"http://www.youareanonymous.com:80","REG_SZ"
RegLocate = "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyEnable"
objShell.RegWrite RegLocate,"1","REG_DWORD"
MsgBox "Cloaked Proxy is Enabled"
else
RegLocate = "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyServer"
objShell.RegWrite RegLocate,"0.0.0.0:80","REG_SZ"
RegLocate = "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyEnable"
objShell.RegWrite RegLocate,"0","REG_DWORD"
MsgBox "Cloaked Proxy is Disabled"
End If
WScript.Quit

Затем сохраните его с расширением .vbs (т.е. ask_user.vbs). Когда вы запустите его, вы увидите следующее приглашение.

«Да» загружает указанный прокси-сервер как ваш прокси-сервер и устанавливает «ProxyEnable» в 1. A «Нет» устанавливает прокси по умолчанию (все нули) и отключает настройку прокси.

2. Быстрое включение нужного прокси-сервера

Другой скрипт позволяет быстро менять прокси-сервер, вводя его в специальное поле.

Скопируйте и вставьте текст в чистый файл Блокнота. Ничего изменять не нужно.

Option Explicit
Dim valUserIn
Dim objShell, RegLocate, RegLocate1
Set objShell = WScript.CreateObject("WScript.Shell")
On Error Resume Next
valUserIn = Inputbox("Enter the Proxy server you want to use.","Proxy Server Required")
RegLocate = "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyServer"
objShell.RegWrite RegLocate,valUserIn,"REG_SZ"
RegLocate = "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyEnable"
objShell.RegWrite RegLocate,"1","REG_DWORD"
MsgBox "Proxy is Enabled"
WScript.Quit

Затем сохраните его с расширением .vbs (т.е. ask_user.vbs). Когда вы запустите его, вы увидите следующее окно.

Просто введите предпочитаемый вами прокси-сервер, нажмите кнопку «ОК», и ваши Интернет-настройки автоматически обновятся.

Спасибо, что читаете! На данный момент большинство моих заметок, статей и подборок выходит в telegram канале «Левашов». Обязательно подписывайтесь, чтобы не пропустить новости мира ИТ, полезные инструкции и нужные сервисы.

Респект за пост! Спасибо за работу!

Хотите больше постов в блоге? Подборок софта и сервисов, а также обзоры на гаджеты? Сейчас, чтобы писать регулярно и радовать вас большими обзорами, мне требуется помощь. Чтобы поддерживать сайт на регулярной основе, вы можете оформить подписку на российском сервисе Boosty. Или воспользоваться ЮMoney (бывшие Яндекс Деньги) для разовой поддержки:

Заранее спасибо! Все собранные средства будут пущены на развитие сайта. Поддержка проекта является подарком владельцу сайта.