List Installed hotfixes on Windows systems

This script has been tested on Windows XP/7/8/2003/2008/2012.

' List Installed Hot Fixes

strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\" & strComputer & "rootcimv2")

Set colQuickFixes = objWMIService.ExecQuery _
    ("Select * from Win32_QuickFixEngineering")

	Wscript.Echo "Computer|Description|Hotfix ID|InstallDate|InstalledBy"
For Each objQuickFix in colQuickFixes
    WScript.Echo objQuickFix.CSName & "|" & objQuickFix.Description & "|" & objQuickFix.HotFixID & "|" & objQuickFix.InstallDate & "|" & objQuickFix.InstalledBy
Next

022213_2242_Justatest1

About The Author

Wessel van Sandwijk

I am a DevOps Engineer from the Netherlands.
My Skills are mainly PowerShell, Ansible, Choco, Automation, Active Directory, VMWare, Hyper-V and Security.

See author's posts

Tags: VBScript