SCSRIPT PARA CONFIGURAR PROXY AUTOMATICAMENTE

Está informação encontrei neste site:

https://social.technet.microsoft.com/Forums/pt-BR/5bb1a852-c63c-4ce5-8f32-55e863bf1fd0/arquivo-bat-para-alterar-proxy?forum=scriptadminpt

 

E foi muito útil, funcionando perfeitamente.

Feche o internet Explorer e execute o script.vbs. Clique em SIM para ativar o proxy, clique em NAO para desativar.

 

dim oShell
set oShell = Wscript.CreateObject("Wscript.Shell")

if msgbox("Habilitar Proxy?", vbQuestion or vbYesNo) = vbYes then
oShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyEnable", 1, "REG_DWORD"
oShell.RegWrite "HKCU\Software\Microsoft\Windows\currentVersion\Internet Settings\ProxyServer", "10.101.0.25:80", "REG_SZ"
else
oShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyEnable", 0, "REG_DWORD"

End if

Set oShell = Nothing