Quantcast
Channel: The Official Scripting Guys Forum! forum
Viewing all articles
Browse latest Browse all 15028

Detect KB

$
0
0

Hi,

 Please checkl my script. Error: expected ')'


'Returns if Windows KB2506143 installed
Option Explicit
Dim objWMI, strComputer
strComputer = "."
 
'Run the query
Set objWMI = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" &strComputer& "\root\cimv2")
 
Dim listPatches
Dim patch
Set listPatches = objWMI.ExecQuery ("Select * from win32_QuickFixEngineering where HotFixID like 'KB2506143'")
For Each patch in listPatches
Wscript.echo "Update installed"
Next
WScript.Quit


Tuan


Viewing all articles
Browse latest Browse all 15028

Latest Images

Trending Articles



Latest Images

<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>