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_PowerPoint11Hyperlink", "WQL", wbemFlagReturnImmediately | wbemFlagForwardOnly); var enumItems = new Enumerator(colItems); for (; !enumItems.atEnd(); enumItems.moveNext()) { var objItem = enumItems.item(); WScript.Echo("Address: " + objItem.Address); WScript.Echo("Index: " + objItem.Index); WScript.Echo("Name: " + objItem.Name); WScript.Echo("ScreenTip: " + objItem.ScreenTip); WScript.Echo("Subaddress: " + objItem.Subaddress); WScript.Echo("Target: " + objItem.Target); WScript.Echo("TextToDisplay: " + objItem.TextToDisplay); WScript.Echo("Type: " + objItem.Type); } }