Hardware Ports and Slots - Scripting
List PCMCIA Controller InformationList Port Connector Properties
List Parallel Port Properties
List Port Resource Information
List Serial Port Configuration Properties
List Serial Port Properties
List System Slot Properties
You can use any of the VBScript programs below in ActiveXperts Network Monitor. Click here for an explanation about how to include scripts in ActiveXperts Network Monitor.
List PCMCIA Controller Information
Returns information about all PCMCIA controllers installed in a computer.
On Error Resume Next strComputer = "." Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") Set colItems = objWMIService.ExecQuery("Select * from Win32_PCMCIAController") For Each objItem in colItems Wscript.Echo "Configuration Manager Error Code: " & _ objItem.ConfigManagerErrorCode Wscript.Echo "Configuration Manager User Configuration: " & _ objItem.ConfigManagerUserConfig Wscript.Echo "Device ID: " & objItem.DeviceID Wscript.Echo "Manufacturer: " & objItem.Manufacturer Wscript.Echo "Name: " & objItem.Name Wscript.Echo "PNP Device ID: " & objItem.PNPDeviceID Wscript.Echo "Protocol Supported: " & objItem.ProtocolSupported Wscript.Echo Next
List Port Connector Properties
Returns information about port connectors installed on a computer.
On Error Resume Next strComputer = "." Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") Set colItems = objWMIService.ExecQuery("Select * from Win32_PortConnector") For Each objItem in colItems Wscript.Echo "Connector Pinout: " & objItem.ConnectorPinout For Each strConnectorType in objItem.ConnectorType Wscript.Echo "Connector Type: " & strConnectorType Next Wscript.Echo "Description: " & objItem.Description Wscript.Echo "External Reference Designator: " & _ objItem.ExternalReferenceDesignator Wscript.Echo "Internal Reference Designator: " & _ objItem.InternalReferenceDesignator Wscript.Echo "Name: " & objItem.Name Wscript.Echo "Port Type: " & objItem.PortType Wscript.Echo "Serial Number: " & objItem.SerialNumber Wscript.Echo "Tag: " & objItem.Tag Wscript.Echo "Version: " & objItem.Version Next
List Parallel Port Properties
Returns information about the parallel ports installed on a computer.
On Error Resume Next strComputer = "." Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") Set colItems = objWMIService.ExecQuery("Select * from Win32_ParallelPort") For Each objItem in colItems Wscript.Echo "Availability: " & objItem.Availability For Each strCapability in objItem.Capabilities Wscript.Echo "Capability: " & strCapability Next Wscript.Echo "Description: " & objItem.Description Wscript.Echo "Device ID: " & objItem.DeviceID Wscript.Echo "Name: " & objItem.Name Wscript.Echo "OS Auto Discovered: " & objItem.OSAutoDiscovered Wscript.Echo "PNP Device ID: " & objItem.PNPDeviceID Wscript.Echo "Protocol Supported: " & objItem.ProtocolSupported Next
List Port Resource Information
Returns information about all the I/O ports found on a computer.
On Error Resume Next strComputer = "." Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") Set colItems = objWMIService.ExecQuery("Select * from Win32_PortResource") For Each objItem in colItems Wscript.Echo "Alias: " & objItem.Alias Wscript.Echo "Ending Address: " & objItem.EndingAddress Wscript.Echo "Name: " & objItem.Name Wscript.Echo "Starting Address: " & objItem.StartingAddress Wscript.Echo Next
List Serial Port Configuration Properties
Enumerates configuration values for all the serial ports installed on a computer.
On Error Resume Next strComputer = "." Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") Set colItems = objWMIService.ExecQuery _ ("Select * from Win32_SerialPortConfiguration") For Each objItem in colItems Wscript.Echo "Abort Read Write On Error: " & objItem.AbortReadWriteOnError Wscript.Echo "Baud Rate: " & objItem.BaudRate Wscript.Echo "Binary Mode Enabled: " & objItem.BinaryModeEnabled Wscript.Echo "Bits Per Byte: " & objItem.BitsPerByte Wscript.Echo "Continue XMit On XOff: " & objItem.ContinueXMitOnXOff Wscript.Echo "CTS Outflow Control: " & objItem.CTSOutflowControl Wscript.Echo "Discard NULL Bytes: " & objItem.DiscardNULLBytes Wscript.Echo "DSR Outflow Control: " & objItem.DSROutflowControl Wscript.Echo "DSR Sensitivity: " & objItem.DSRSensitivity Wscript.Echo "DTR Flow Control Type: " & objItem.DTRFlowControlType Wscript.Echo "EOF Character: " & objItem.EOFCharacter Wscript.Echo "Error Replace Character: " & objItem.ErrorReplaceCharacter Wscript.Echo "Error Replacement Enabled: " & _ objItem.ErrorReplacementEnabled Wscript.Echo "Event Character: " & objItem.EventCharacter Wscript.Echo "Is Busy: " & objItem.IsBusy Wscript.Echo "Name: " & objItem.Name Wscript.Echo "Parity: " & objItem.Parity Wscript.Echo "Parity Check Enabled: " & objItem.ParityCheckEnabled Wscript.Echo "RTS Flow Control Type: " & objItem.RTSFlowControlType Wscript.Echo "Setting ID: " & objItem.SettingID Wscript.Echo "Stop Bits: " & objItem.StopBits Wscript.Echo "XOff Character: " & objItem.XOffCharacter Wscript.Echo "XOff XMit Threshold: " & objItem.XOffXMitThreshold Wscript.Echo "XOn Character: " & objItem.XOnCharacter Wscript.Echo "XOn XMit Threshold: " & objItem.XOnXMitThreshold Wscript.Echo "XOn XOff InFlow Control: " & objItem.XOnXOffInFlowControl Wscript.Echo "XOn XOff OutFlow Control: " & objItem.XOnXOffOutFlowControl Next
List Serial Port Properties
Returns information about the serial ports installed on a computer.
On Error Resume Next strComputer = "." Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") Set colItems = objWMIService.ExecQuery("Select * from Win32_SerialPort") For Each objItem in colItems Wscript.Echo "Binary: " & objItem.Binary Wscript.Echo "Description: " & objItem.Description Wscript.Echo "Device ID: " & objItem.DeviceID Wscript.Echo "Maximum Baud Rate: " & objItem.MaxBaudRate Wscript.Echo "Maximum Input Buffer Size: " & objItem.MaximumInputBufferSize Wscript.Echo "Maximum Output Buffer Size: " & _ objItem.MaximumOutputBufferSize Wscript.Echo "Name: " & objItem.Name Wscript.Echo "OS Auto Discovered: " & objItem.OSAutoDiscovered Wscript.Echo "PNP Device ID: " & objItem.PNPDeviceID Wscript.Echo "Provider Type: " & objItem.ProviderType Wscript.Echo "Settable Baud Rate: " & objItem.SettableBaudRate Wscript.Echo "Settable Data Bits: " & objItem.SettableDataBits Wscript.Echo "Settable Flow Control: " & objItem.SettableFlowControl Wscript.Echo "Settable Parity: " & objItem.SettableParity Wscript.Echo "Settable Parity Check: " & objItem.SettableParityCheck Wscript.Echo "Settable RLSD: " & objItem.SettableRLSD Wscript.Echo "Settable Stop Bits: " & objItem.SettableStopBits Wscript.Echo "Supports 16-Bit Mode: " & objItem.Supports16BitMode Wscript.Echo "Supports DTRDSR: " & objItem.SupportsDTRDSR Wscript.Echo "Supports Elapsed Timeouts: " & _ objItem.SupportsElapsedTimeouts Wscript.Echo "Supports Int Timeouts: " & objItem.SupportsIntTimeouts Wscript.Echo "Supports Parity Check: " & objItem.SupportsParityCheck Wscript.Echo "Supports RLSD: " & objItem.SupportsRLSD Wscript.Echo "Supports RTSCTS: " & objItem.SupportsRTSCTS Wscript.Echo "Supports Special Characters: " & _ objItem.SupportsSpecialCharacters Wscript.Echo "Supports XOn XOff: " & objItem.SupportsXOnXOff Wscript.Echo "Supports XOn XOff Setting: " & objItem.SupportsXOnXOffSet Next
List System Slot Properties
Returns information about the system slots installed on a computer.
On Error Resume Next strComputer = "." Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") Set colItems = objWMIService.ExecQuery("Select * from Win32_SystemSlot") For Each objItem in colItems For Each strConnectorPinout in objItem.ConnectorPinout Wscript.Echo "Connector Pinout: " & strConnectorPinout Next Wscript.Echo "Connector Type: " & objItem.ConnectorType Wscript.Echo "Current Usage: " & objItem.CurrentUsage Wscript.Echo "Description: " & objItem.Description Wscript.Echo "Height Allowed: " & objItem.HeightAllowed Wscript.Echo "Length Allowed: " & objItem.LengthAllowed Wscript.Echo "Manufacturer: " & objItem.Manufacturer Wscript.Echo "Maximum Data Width: " & objItem.MaxDataWidth Wscript.Echo "Model: " & objItem.Model Wscript.Echo "Name: " & objItem.Name Wscript.Echo "Number: " & objItem.Number Wscript.Echo "PME Signal: " & objItem.PMESignal Wscript.Echo "Shared: " & objItem.Shared Wscript.Echo "Slot Designation: " & objItem.SlotDesignation Wscript.Echo "Supports Hot Plug: " & objItem.SupportsHotPlug Wscript.Echo "Tag: " & objItem.Tag Wscript.Echo "Thermal Rating: " & objItem.ThermalRating For Each strVccVoltageSupport in objItem.VccMixedVoltageSupport Wscript.Echo "VCC Mixed Voltage Support: " & strVccVoltageSupport Next Wscript.Echo "Version: " & objItem.Version For Each strVppVoltageSupport in objItem.VppMixedVoltageSupport Wscript.Echo "VPP Mixed Voltage Support: " & strVppVoltageSupport Next Next