Skip to content

Instantly share code, notes, and snippets.

Set updateSession = CreateObject("Microsoft.Update.Session")
updateSession.ClientApplicationID = "MSDN Sample Script"
Set updateSearcher = updateSession.CreateUpdateSearcher()
WScript.Echo "Searching for updates..." & vbCRLF
Set searchResult = _
updateSearcher.Search("IsInstalled=0 and Type='Software' and IsHidden=0")
WScript.Echo "List of applicable items on the machine:"
For I = 0 To searchResult.Updates.Count-1
Set update = searchResult.Updates.Item(I)
WScript.Echo I + 1 & "> " & update.Title

Keybase proof

I hereby claim:

  • I am lukebarone on github.
  • I am lukebarone (https://keybase.io/lukebarone) on keybase.
  • I have a public key whose fingerprint is 732A 999D 8068 F039 E8E1 8206 6F91 A9AB B04B 1778

To claim this, I am signing this object: