#include <MsgBoxConstants.au3>

local $PAC = "http://10.0.84.24/proxy.pac"
local $regKey = "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings"
local $regError = ""
local $errorTitle = ""
Local $msgTimeout = 3

If @OSArch <> "X86" Then $regKey = "HKEY_CURRENT_USER64\Software\Microsoft\Windows\CurrentVersion\Internet Settings"

RegWrite($regKey, "ProxyServer", "REG_SZ", "")
RegWrite($regKey, "ProxyEnable","REG_DWORD", "0")
RegWrite($regKey, "AutoConfigURL", "REG_SZ", $PAC)

Switch @error
	Case 1 
		$regError =  "Unable to open requested key"
		$errorTitle = "Error" 

	Case 2
		$regError = "Unable to open requested main key"
		$errorTitle = "Error" 
	Case 3
		$regError = "Unable to remote connect to the registry"
		$errorTitle = "Error" 
	Case -1 
		$regError = "Unable to open requested value"
		$errorTitle = "Error" 
	Case -2
		$regError = "Value type not supported"
		$errorTitle = "Error" 
	Case 0 
		$regError = "Fixed! Enter a new URL into the browser"
		$errorTitle = "Success" 
	Case Else
		$regError = "Unexpected Error"
		$errorTitle = "Error" 
EndSwitch

DllCall('WININET.DLL', 'long', 'InternetSetOption', 'int', 0, 'long', 39, 'str', 0, 'long', 0)

MsgBox($MB_SYSTEMMODAL, $errorTitle, $regError, $msgTimeout)