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\\WMI");
   var colItems = objWMIService.ExecQuery("SELECT * FROM MSSerial_CommProperties", "WQL",
                                          wbemFlagReturnImmediately | wbemFlagForwardOnly);

   var enumItems = new Enumerator(colItems);
   for (; !enumItems.atEnd(); enumItems.moveNext()) {
      var objItem = enumItems.item();

      WScript.Echo("Active: " + objItem.Active);
      WScript.Echo("dwCurrentRxQueue: " + objItem.dwCurrentRxQueue);
      WScript.Echo("dwCurrentTxQueue: " + objItem.dwCurrentTxQueue);
      WScript.Echo("dwMaxBaud: " + objItem.dwMaxBaud);
      WScript.Echo("dwMaxRxQueue: " + objItem.dwMaxRxQueue);
      WScript.Echo("dwMaxTxQueue: " + objItem.dwMaxTxQueue);
      WScript.Echo("dwProvCapabilities: " + objItem.dwProvCapabilities);
      WScript.Echo("dwProvCharSize: " + objItem.dwProvCharSize);
      WScript.Echo("dwProvSpec1: " + objItem.dwProvSpec1);
      WScript.Echo("dwProvSpec2: " + objItem.dwProvSpec2);
      WScript.Echo("dwProvSubType: " + objItem.dwProvSubType);
      WScript.Echo("dwReserved1: " + objItem.dwReserved1);
      WScript.Echo("dwServiceMask: " + objItem.dwServiceMask);
      WScript.Echo("dwSettableBaud: " + objItem.dwSettableBaud);
      WScript.Echo("dwSettableParams: " + objItem.dwSettableParams);
      WScript.Echo("InstanceName: " + objItem.InstanceName);
      try { WScript.Echo("wcProvChar: " + (objItem.wcProvChar.toArray()).join(",")); }
         catch(e) { WScript.Echo("wcProvChar: null"); }
      WScript.Echo("wPacketLength: " + objItem.wPacketLength);
      WScript.Echo("wPacketVersion: " + objItem.wPacketVersion);
      WScript.Echo("wSettableData: " + objItem.wSettableData);
      WScript.Echo("wSettableStopParity: " + objItem.wSettableStopParity);
   }
}