All pastes #385080 Raw Edit

Hotfix

public text v1 · immutable
·published 2007-03-07 16:11 UTC
rendered paste body
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colQuickFixes = objWMIService.ExecQuery _
    ("Select * from Win32_QuickFixEngineering where HotFixID='KB928089'")

If colQuickFixes.Count>=1 Then
Wscript.Echo "Installed"
Else
Wscript.Echo "Not Installed"
End IF