asheludko
15-01-2018, 00:00
Доброго времени суток! Создал сценарий для автоматизации подключения через прокси. Если прокси требует авторизацию (логин и пароль), то как это можно реализовать в коде. спасибо за ответ.
Dim Sh
Proxy = "5.188.51.134"
Port= "21615"
' VBScript.
'Скрипт настройки параметров
Set Sh = CreateObject("WScript.Shell")
key = "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings"
'Включаем прокси
Sh.RegWrite key & "ProxyEnable", 1, "REG_DWORD"
Sh.RegWrite key & "ProxyServer", "http=" & proxy & ":" & port, "REG_SZ"
Dim Sh
Proxy = "5.188.51.134"
Port= "21615"
' VBScript.
'Скрипт настройки параметров
Set Sh = CreateObject("WScript.Shell")
key = "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings"
'Включаем прокси
Sh.RegWrite key & "ProxyEnable", 1, "REG_DWORD"
Sh.RegWrite key & "ProxyServer", "http=" & proxy & ":" & port, "REG_SZ"