Lists property values for all the network adapters 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_NetworkAdapter")
    say "Adapter Type:" objItem~AdapterType
    say "Adapter Type Id:" objItem~AdapterTypeId
    say "AutoSense:" objItem~AutoSense
    say "Availability:" objItem~Availability
    say "Caption:" objItem~Caption
    say "Config Manager Error Code:" objItem~ConfigManagerErrorCode
    say "Config Manager User Config:" objItem~ConfigManagerUserConfig
    say "Creation Class Name:" objItem~CreationClassName
    say "Description:" objItem~Description
    say "Device ID:" objItem~DeviceID
    say "Error Cleared:" objItem~ErrorCleared
    say "Error Description:" objItem~ErrorDescription
    say "Index:" objItem~Index
    say "Install Date:" objItem~InstallDate
    say "Installed:" objItem~Installed
    say "Last Error Code:" objItem~LastErrorCode
    say "MAC Address:" objItem~MACAddress
    say "Manufacturer:" objItem~Manufacturer
    say "Max Number Controlled:" objItem~MaxNumberControlled
    say "Max Speed:" objItem~MaxSpeed
    say "Name:" objItem~Name
    say "Net Connection ID:" objItem~NetConnectionID
    say "Net Connection Status:" objItem~NetConnectionStatus
    z = objItem~NetworkAddresses
    if .NIL <> z then
        do x over z
            say objProperty.Name ": " x
    end
    say "Permanent Address:" objItem~PermanentAddress
    say "PNP Device ID:" objItem~PNPDeviceID
    z = objItem~PowerManagementCapabilities
    if .NIL <> z then
        do x over z
            say objProperty.Name ": " x
    end
    say "Power Management Supported:" objItem~PowerManagementSupported
    say "Product Name:" objItem~ProductName
    say "Service Name:" objItem~ServiceName
    say "Speed:" objItem~Speed
    say "Status:" objItem~Status
    say "Status Info:" objItem~StatusInfo
    say "System Creation Class Name:" objItem~SystemCreationClassName
    say "System Name:" objItem~SystemName
    say "Time Of Last Reset:" objItem~TimeOfLastReset
end