Open Notepad
Paste the following content and save as proxy.vbs
Double click to execute.
This script will set the proxy : proxy1.emirates.net.ae on port : 8080
***************************
Const HKEY_CURRENT_USER = &H80000001
strComputer = “.”
Set objRegistry = GetObject(“winmgmts:\\” & strComputer & “\root\default:StdRegProv”)
strKeyPath = “SOFTWARE\Microsoft\Windows\CurrentVersion\Internet Settings”
Set objRegistry = GetObject(“winmgmts:\\” & strComputer & “\root\default:StdRegProv”)
strKeyPath = “SOFTWARE\Microsoft\Windows\CurrentVersion\Internet Settings”
strValueName = “ProxyEnable”
dwValue = 1
objRegistry.SetDWORDValue HKEY_CURRENT_USER, strKeyPath, strValueName, dwValue
dwValue = 1
objRegistry.SetDWORDValue HKEY_CURRENT_USER, strKeyPath, strValueName, dwValue
strValueName = “proxy1.emirates.net.ae”
strValue = “svcproxy:8080”
objRegistry.SetStringValue HKEY_CURRENT_USER, strKeyPath, strValueName, strValue
strValue = “svcproxy:8080”
objRegistry.SetStringValue HKEY_CURRENT_USER, strKeyPath, strValueName, strValue
strValueName = “ProxyOverride”
strValue = “”
objRegistry.SetStringValue HKEY_CURRENT_USER, strKeyPath, strValueName, strValue
strValue = “”
objRegistry.SetStringValue HKEY_CURRENT_USER, strKeyPath, strValueName, strValue