WSUS 3

'======================================================
' NAME: SusClientIDReset.vbs
'
' AUTHOR: Free for all usage
' DATE  : 29/08/2008
'
' COMMENT: The script resets SusClientID registry value on the current computer.
'
' When Sysprep or another unique SID-generating technology is used to create 
' the images, the SusClientId registry value is not cleared if it has been 
' populated within the image before the image is deployed. Because of that 
' behaviour the computers built from this image do not appear in the WSUS 
' console or they replace the original computer’s entry.
'
' For more information see http://support.microsoft.com/kb/903262.  
'======================================================

const HKEY_LOCAL_MACHINE = &H80000002
strComputer = "."

Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colServiceList = objWMIService.ExecQuery _
        ("Select * from Win32_Service where Name='wuauserv'")

' === Stop Windows Update (wuauserv) service ===
For each objService in colServiceList
    errReturn = objService.StopService()
Next

Set oReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\" &_ 
strComputer & "\root\default:StdRegProv")
 
strKeyPath = "SOFTWARE\Microsoft\Windows\CurrentVersion\WindowsUpdate"
strStringValueName = "SusClientId"
 
' === Remove the SusClientID from the registry ===
oReg.DeleteValue HKEY_LOCAL_MACHINE,strKeyPath,strStringValueName

' === Start Windows Update (wuauserv) service ===
For each objService in colServiceList
    errReturn = objService.StartService()
Next

' === Reset the computer ID in WSUS Server ===
Set objProcess = objWMIService.Get("Win32_Process")
Set objProgram = objProcess.Methods_("Create").InParameters.SpawnInstance_

strExe = "wuauclt.exe /resetauthorization /detectnow"
objProgram.CommandLine = strExe
Set strShell = objWMIService.ExecMethod("Win32_Process", "Create", objProgram)

WScript.Echo ("Please, wait 10 min. and run wuauclt.exe /reportnow")
WScript.Quit  

Select allOpen in new window