UnhideHiddenUpdates.au3

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Res_Fileversion=1.0.0.5
#AutoIt3Wrapper_UseUpx=n
#AutoIt3Wrapper_Res_FileVersion_AutoIncrement=y
#AutoIt3Wrapper_Run_Tidy=y
#AutoIt3Wrapper_Res_LegalCopyright=Wolfgang Führer
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
;----------------------------------------------
; UnhideHiddenUpdates.au3
; --Beschreibung--
; Wolfgang Führer
; 07.01.2010  -  11:30:55,06
;----------------------------------------------
 
Opt("MustDeclareVars", 0) ;0=no, 1=require pre-declare
Opt("TrayIconDebug", 0) ;0=no info, 1=debug line info
Opt("TrayIconHide", 1) ;0=show, 1=hide tray icon
Opt("WinTitleMatchMode", 4) ;1=start, 2=subStr, 3=exact, 4=...
Opt("TrayAutoPause", 0) ;0 = no pause, 1 = pause (default)
Opt("WinWaitDelay", 250)
 
$oSearcher = ObjCreate("Microsoft.Update.Searcher")
$oSearcher.Online = False
$oSearchResult = $oSearcher.Search("IsHidden=1")
If @error == 0 Then
	If $oSearchResult.Updates.Count > 0 Then
		For $i = 1 To $oSearchResult.Updates.Count - 1
			$oUpdate = $oSearchResult.Updates($i)
			$oUpdate.IsHidden = False
		Next
	EndIf
EndIf
RunWait("wuauclt.exe /detectnow")
Exit (0)

Kommentare

Leider unzuverlässig

Leider nicht ganz zuverlässig. Es fehlt die "On Error Resume Next" Funktion in AutoIT.

Besser das VBscript nehmen!