Uses WMI to return information about all the network protocols installed on a computer.

This script was tested using Object REXX 2.1.0 for Microsoft Windows, available from IBM.

Object REXX
Edit|Remove
strComputer = "."
objWMIService = .OLEObject~GetObject("winmgmts:\\"||strComputer||"\root\CIMV2")
do objItem over objWMIService~ExecQuery("Select * from Win32_NetworkProtocol")
    say "Caption:" objItem~Caption
    say "Connectionless Service:" objItem~ConnectionlessService
    say "Description:" objItem~Description
    say "Guarantees Delivery:" objItem~GuaranteesDelivery
    say "Guarantees Sequencing:" objItem~GuaranteesSequencing
    say "Install Date:" objItem~InstallDate
    say "Maximum Address Size:" objItem~MaximumAddressSize
    say "Maximum Message Size:" objItem~MaximumMessageSize
    say "Message Oriented:" objItem~MessageOriented
    say "Minimum Address Size:" objItem~MinimumAddressSize
    say "Name:" objItem~Name
    say "Pseudo Stream Oriented:" objItem~PseudoStreamOriented
    say "Status:" objItem~Status
    say "Supports Broadcasting:" objItem~SupportsBroadcasting
    say "Supports Connect Data:" objItem~SupportsConnectData
    say "Supports Disconnect Data:" objItem~SupportsDisconnectData
    say "Supports Encryption:" objItem~SupportsEncryption
    say "Supports Expedited Data:" objItem~SupportsExpeditedData
    say "Supports Fragmentation:" objItem~SupportsFragmentation
    say "Supports Graceful Closing:" objItem~SupportsGracefulClosing
    say "Supports Guaranteed Bandwidth:" objItem~SupportsGuaranteedBandwidth
    say "Supports Multicasting:" objItem~SupportsMulticasting
    say "Supports Quality of Service:" objItem~SupportsQualityofService
end