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). Когда вы запустите его, вы увидите следующее приглашение.

use a cloaked proxy prompt

«Да» загружает указанный прокси-сервер как ваш прокси-сервер и устанавливает «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). Когда вы запустите его, вы увидите следующее окно.

manual entry for cloaked proxy

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


Спасибо, что читаете! Подписывайтесь на мой канал в Telegram и Яндекс.Дзен. Только там последние обновления блога и новости мира информационных технологий. Также, читайте меня в социальных сетях: Facebook, Twitter, VKOK.

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

Хотите больше постов? Узнавать новости технологий? Читать обзоры на гаджеты? Для всего этого, а также для продвижения сайта, покупки нового дизайна и оплаты хостинга, мне необходима помощь от вас, преданные и благодарные читатели. Подробнее о донатах читайте на специальной странице.

На данный момент есть возможность стать патроном, чтобы ежемесячно поддерживать блог донатом, или воспользоваться Яндекс.Деньгами, WebMoney, QIWI и PayPal:

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

Закладка Постоянная ссылка.

Оставить комментарий

avatar
  Подписаться  
Уведомление о