 Loading |
|
Loading |
| VBScript |
| JavaScript |
| Powershell |
Search Options: WMI Win32_AccessSummary Query
|
||
|
var wbemFlagReturnImmediately = 0x10;
var wbemFlagForwardOnly = 0x20; var arrComputers = new Array("."); for (i = 0; i < arrComputers.length; i++) { WScript.Echo(); WScript.Echo("=========================================="); WScript.Echo("Computer: " + arrComputers[i]); WScript.Echo("=========================================="); var objWMIService = GetObject("winmgmts:\\\\" + arrComputers[i] + "\\root\\MSAPPS11"); var colItems = objWMIService.ExecQuery("SELECT * FROM Win32_AccessSummary", "WQL", wbemFlagReturnImmediately | wbemFlagForwardOnly); var enumItems = new Enumerator(colItems); for (; !enumItems.atEnd(); enumItems.moveNext()) { var objItem = enumItems.item(); WScript.Echo("ADOVersion: " + objItem.ADOVersion); WScript.Echo("Build: " + objItem.Build); WScript.Echo("Language: " + objItem.Language); WScript.Echo("Name: " + objItem.Name); WScript.Echo("Path: " + objItem.Path); WScript.Echo("ProductID: " + objItem.ProductID); WScript.Echo("References: " + objItem.References); WScript.Echo("VBAVersion: " + objItem.VBAVersion); WScript.Echo("Version: " + objItem.Version); } } | ||
© 2008 - 2013 Boris Toll :: Scripts available: 6.481 :: :: scriptbox.toll.at :: :: powered by www.toll.at :: | ||
