Surely, I am volunteering for something that we (you and me) like playing with
Here is the story – I really liked the utility that Eric is working on http://blogs.msdn.com/ericwhite/archive/2008/06/14/openxmldiff-exe-a-utility-to-find-the-differences-between-two-open-xml-documents.aspx.
Going through the post, I noticed that Eric is looking for volunteers for converting the project to GUI to work on some possible enhancements, I pinged Eric and he agreed to let me work on it!
so, I started working on it …. in this week (or next at max) there should be a few updates from my side.
Not responsible for errors in content, meaning, tact, or judgment. Live and let live. Toes go in first. I didn't do it. Enjoy.
Today of my team members asked me, how to get a list of Office and Windows updates.
Surprisingly, I realized, that there is no easy way to do it (or at least I couldn’t find it ) – finally came up with following code snippets:
'For getting a list of office updates '--- --- --- --- --- --- --- --- --- On Error Resume Next strComputer = "." Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") Set colItems = objWMIService.ExecQuery("Select * from Win32Reg_AddRemovePrograms where DisplayName Like '%update%office%' OR DisplayName Like '%update%visio%' OR DisplayName Like '%update%word%' OR DisplayName Like '%update%excel%' OR DisplayName Like '%update%powerpoint%' OR DisplayName Like '%update%project%' ",,48 ) For Each objItem in colItems Wscript.Echo "DisplayName: " & objItem.DisplayName Wscript.Echo "InstallDate: " & objItem.InstallDate Wscript.Echo "ProdID: " & objItem.ProdID Wscript.Echo "Publisher: " & objItem.Publisher Wscript.Echo "Version: " & objItem.Version Next '--- --- --- --- --- --- --- --- ---
' For getting a list of Windows Updates ' ----------------------------------- On Error Resume Next strComputer = "." Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") Set colItems = objWMIService.ExecQuery("Select * from Win32_QuickFixEngineering",,48) For Each objItem in colItems Wscript.Echo "Caption: " & objItem.Caption Wscript.Echo "CSName: " & objItem.CSName Wscript.Echo "Description: " & objItem.Description Wscript.Echo "FixComments: " & objItem.FixComments Wscript.Echo "HotFixID: " & objItem.HotFixID Wscript.Echo "InstallDate: " & objItem.InstallDate Wscript.Echo "InstalledBy: " & objItem.InstalledBy Wscript.Echo "InstalledOn: " & objItem.InstalledOn Wscript.Echo "Name: " & objItem.Name Wscript.Echo "ServicePackInEffect: " & objItem.ServicePackInEffect Wscript.Echo "Status: " & objItem.Status Next '-----------------------------------
Let’s see what the OpenXML guru’s take about it ..
Here is full description from none other then …Erika Doug Mahugh: Open XML SDK Version 1 released Look at it … Eric released PowerShell cmdlets to manipulate OpenXML docs (using OpenXML SDK). WoW..
Yep. I am working on some changes on my blog and you might see some things broken, out of place or just plain ugly for a few days. Please bear with me for a few days.
I am thinking of using a good JavaScript library which can ease my some of my troubles. For now, I am playing with the idea of using www.mootools.com. Let’s see how it goes.