A simple VBS script to change IE Proxy Settings

I give this script to remote users so they can remove the Proxy settings when off site.

set WshShell = CreateObject("WScript.Shell")
Const HKEY_CURRENT_USER = &H80000001

strComputer = "."
Set objRegistry = GetObject("winmgmts:\" & strComputer & "rootdefault:StdRegProv")

strKeyPath = "SOFTWAREMicrosoftWindowsCurrentVersionInternet Settings"
wshshell.run "tskill iexplore /a"
strValueName = "ProxyEnable"
dwValue = 0
objRegistry.SetDWORDValue HKEY_CURRENT_USER, strKeyPath, strValueName, dwValue

strValueName = "ProxyServer"
strValue = "OfficeProxyIPorDNS:8080"
objRegistry.SetStringValue HKEY_CURRENT_USER, strKeyPath, strValueName, strValue

strValueName = "ProxyOverride"
strValue = ""
objRegistry.SetStringValue HKEY_CURRENT_USER, strKeyPath, strValueName, strValue

Result = WshShell.Popup("Proxy Removed", 4, "Internet ready for home use", 64)

I also give them a separate script to turn it back on again, simply edit the above script changing

dwValue = 0

to

dwValue = 1