On Error Resume Next Set WshShell = WScript.CreateObject("WScript.Shell") checkOSArch = WshShell.RegRead("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Environment\PROCESSOR_ARCHITECTURE") if Err Then Err.Clear regkey = "HKEY_LOCAL_MACHINE\SOFTWARE\AdventNet\DesktopCentral\DCAgent\" else if checkOSArch = "x86" Then regkey = "HKEY_LOCAL_MACHINE\SOFTWARE\AdventNet\DesktopCentral\DCAgent\" else regkey = "HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\AdventNet\DesktopCentral\DCAgent\" End IF End If agentVersion = WshShell.RegRead(regkey&"DCAgentVersion") if Err Then Err.Clear Else WshShell.Run "msiexec.exe /x{6AD2231F-FF48-4D59-AC26-405AFAE23DB7} /q",0,True End If