Wscript.Echo "Hotfix report date: " & Now & vbCrLf strComputer = "." ' use "." for local computer Const HKLM = &H80000002 'On Error Resume Next Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") Set colSettings = objWMIService.ExecQuery _ ("Select * from Win32_OperatingSystem") ' get general info about the OS ' Caption value for different OS: ' Microsoft...
This document applies to all windows servers and clients * for checking the update Go to start > CMD > run the following command " wmic qfe list" ** gives you the complete list of installed update on the servers ******************************************************************************* If you need a script then find it below ******************************************************************************* @echo on wmic /node: Server name qfe GET description,FixComments,hotfixid,installedby,installedon > %temp%\UpdateList.txt notepad %temp%\UpdateList.txt...
'--------------------8<---------------------- ' Script that reports installed updates that are ' installed with Windows Update v5 technology ' ' Result will be written to %temp%\UpdateHistory.txt ' and then launched in Notepad ' ' Author: Aslam Latheef Shaik ' Date 2012-08-11 ' Option Explicit Const OverwriteIfExist = -1 Const OpenAsASCII = 0 Dim oWU, iTHCount, colUpdate, oUpdate, sStatus, iTotal Dim iSuccess, iFailed, iAborted, iUnknown,...