Please let us know how useful you find this tip by rating it below. Do you have a useful Windows tip, timesaver or workaround to share? Submit it to our tip contest and you could win a prize!
This VB Script can retrieve summary information such as ActivePrinter, CipherStrength, ContentAdvisor, IEAKInstall, Language, ProductID and Version from Internet Explorer.
Before you run this script however, make sure you have the latest scripting engines on your workstation. You can download the latest scripting engines here: Microsoft Scripting Home Page.
On Error Resume Next
Const wbemFlagReturnImmediately = &h10
Const wbemFlagForwardOnly = &h20
arrComputers = Array("COMPUTERNAMES")
For Each strComputer In arrComputers
WScript.Echo
WScript.Echo
"=========================================="
WScript.Echo "Computer: " & strComputer
WScript.Echo
"=========================================="
Set objWMIService = GetObject("winmgmts: \ \" & strComputer & "\root\CIMV2\Applications\MicrosoftIE")
Set colItems = objWMIService.ExecQuery("SELECT * FROM MicrosoftIE_Summary", "WQL", _
wbemFlagReturnImmediately + wbemFlagForwardOnly)
For Each objItem In colItems
WScript.Echo "ActivePrinter: " & objItem.ActivePrinter
WScript.Echo "Build: " & objItem.Build
WScript.Echo "Caption: " & objItem.Caption
WScript.Echo "CipherStrength: " & objItem.CipherStrength
WScript.Echo "ContentAdvisor: " & objItem.ContentAdvisor
WScript.Echo "Description: " & objItem.Description
WScript.Echo "IEAKInstall: " & objItem.IEAKInstall
WScript.Echo "Language: " & objItem.Language
WScript.Echo "Name: " & objItem.Name
WScript.Echo "Path: " & objItem.Path
WScript.Echo "ProductID: " & objItem.ProductID
WScript.Echo "SettingID: " & objItem.SettingID
WScript.Echo "Version: " & objItem.Version
WScript.Echo
Next
Next
Rod Trent, manager of myITforum.com and Microsoft MVP, is a leading expert on Microsoft Systems Management Server. He has more than 18 years of IT experience -- eight of which have been dedicated to SMS. He is the author of Microsoft SMS Installer, Admin911: SMS, and IIS 5.0: A Beginner's Guide, and has written, literally, thousands of articles on technology topics.
Copy and paste the following script (between the lines) into Notepad -- make sure you have Word Wrap disabled -- and then save it with a .vbs extension.
