by Karthikeyan (187 Submissions)
Category: Miscellaneous
Compatability: VB Script
Difficulty: Unknown Difficulty
Originally Published: Thu 29th July 2004
Date Added: Mon 8th February 2021
Rating: 
(1 Votes)
Get the Network Adapter Configuration details using Win32_NetworkAdapterConfiguration WMI Class
VBcoders
'Generated using 'WMI Win32 Class Autoscript Generator' - Developed by Karthikeyan
'Homepage: http://www.geocities.com/marskarthik
On Error Resume Next
Computer = "."
Set OutFile = CreateObject("WScript.Shell")
Const ForAppending = 2
Set FileSystem = CreateObject("Scripting.FileSystemObject")
Set TextFile = FileSystem.OpenTextFile ("c:\Win32_NetworkAdapterConfiguration.txt", ForAppending, True)
TextFile.WriteLine "Script for Win32_NetworkAdapterConfiguration Class by Karthikeyan"
TextFile.WriteLine
Set WMIService = GetObject("winmgmts:\\" & Computer & "\root\cimv2")
Set Items = WMIService.ExecQuery("Select * from Win32_NetworkAdapterConfiguration",,48)
For Each SubItems in Items
TextFile.WriteLine "********************************************************************"
TextFile.WriteLine "ArpAlwaysSourceRoute: " & SubItems.ArpAlwaysSourceRoute
TextFile.WriteLine "ArpUseEtherSNAP: " & SubItems.ArpUseEtherSNAP
TextFile.WriteLine "Caption: " & SubItems.Caption
TextFile.WriteLine "DatabasePath: " & SubItems.DatabasePath
TextFile.WriteLine "DeadGWDetectEnabled: " & SubItems.DeadGWDetectEnabled
TextFile.WriteLine "DefaultIPGateway: " & SubItems.DefaultIPGateway
TextFile.WriteLine "DefaultTOS: " & SubItems.DefaultTOS
TextFile.WriteLine "DefaultTTL: " & SubItems.DefaultTTL
TextFile.WriteLine "Description: " & SubItems.Description
TextFile.WriteLine "DHCPEnabled: " & SubItems.DHCPEnabled
TextFile.WriteLine "DHCPLeaseExpires: " & SubItems.DHCPLeaseExpires
TextFile.WriteLine "DHCPLeaseObtained: " & SubItems.DHCPLeaseObtained
TextFile.WriteLine "DHCPServer: " & SubItems.DHCPServer
TextFile.WriteLine "DNSDomain: " & SubItems.DNSDomain
TextFile.WriteLine "DNSDomainSuffixSearchOrder: " & SubItems.DNSDomainSuffixSearchOrder
TextFile.WriteLine "DNSEnabledForWINSResolution: " & SubItems.DNSEnabledForWINSResolution
TextFile.WriteLine "DNSHostName: " & SubItems.DNSHostName
TextFile.WriteLine "DNSServerSearchOrder: " & SubItems.DNSServerSearchOrder
TextFile.WriteLine "DomainDNSRegistrationEnabled: " & SubItems.DomainDNSRegistrationEnabled
TextFile.WriteLine "ForwardBufferMemory: " & SubItems.ForwardBufferMemory
TextFile.WriteLine "FullDNSRegistrationEnabled: " & SubItems.FullDNSRegistrationEnabled
TextFile.WriteLine "GatewayCostMetric: " & SubItems.GatewayCostMetric
TextFile.WriteLine "IGMPLevel: " & SubItems.IGMPLevel
TextFile.WriteLine "Index: " & SubItems.Index
TextFile.WriteLine "IPAddress: " & SubItems.IPAddress
TextFile.WriteLine "IPConnectionMetric: " & SubItems.IPConnectionMetric
TextFile.WriteLine "IPEnabled: " & SubItems.IPEnabled
TextFile.WriteLine "IPFilterSecurityEnabled: " & SubItems.IPFilterSecurityEnabled
TextFile.WriteLine "IPPortSecurityEnabled: " & SubItems.IPPortSecurityEnabled
TextFile.WriteLine "IPSecPermitIPProtocols: " & SubItems.IPSecPermitIPProtocols
TextFile.WriteLine "IPSecPermitTCPPorts: " & SubItems.IPSecPermitTCPPorts
TextFile.WriteLine "IPSecPermitUDPPorts: " & SubItems.IPSecPermitUDPPorts
TextFile.WriteLine "IPSubnet: " & SubItems.IPSubnet
TextFile.WriteLine "IPUseZeroBroadcast: " & SubItems.IPUseZeroBroadcast
TextFile.WriteLine "IPXAddress: " & SubItems.IPXAddress
TextFile.WriteLine "IPXEnabled: " & SubItems.IPXEnabled
TextFile.WriteLine "IPXFrameType: " & SubItems.IPXFrameType
TextFile.WriteLine "IPXMediaType: " & SubItems.IPXMediaType
TextFile.WriteLine "IPXNetworkNumber: " & SubItems.IPXNetworkNumber
TextFile.WriteLine "IPXVirtualNetNumber: " & SubItems.IPXVirtualNetNumber
TextFile.WriteLine "KeepAliveInterval: " & SubItems.KeepAliveInterval
TextFile.WriteLine "KeepAliveTime: " & SubItems.KeepAliveTime
TextFile.WriteLine "MACAddress: " & SubItems.MACAddress
TextFile.WriteLine "MTU: " & SubItems.MTU
TextFile.WriteLine "NumForwardPackets: " & SubItems.NumForwardPackets
TextFile.WriteLine "PMTUBHDetectEnabled: " & SubItems.PMTUBHDetectEnabled
TextFile.WriteLine "PMTUDiscoveryEnabled: " & SubItems.PMTUDiscoveryEnabled
TextFile.WriteLine "ServiceName: " & SubItems.ServiceName
TextFile.WriteLine "SettingID: " & SubItems.SettingID
TextFile.WriteLine "TcpipNetbiosOptions: " & SubItems.TcpipNetbiosOptions
TextFile.WriteLine "TcpMaxConnectRetransmissions: " & SubItems.TcpMaxConnectRetransmissions
TextFile.WriteLine "TcpMaxDataRetransmissions: " & SubItems.TcpMaxDataRetransmissions
TextFile.WriteLine "TcpNumConnections: " & SubItems.TcpNumConnections
TextFile.WriteLine "TcpUseRFC1122UrgentPointer: " & SubItems.TcpUseRFC1122UrgentPointer
TextFile.WriteLine "TcpWindowSize: " & SubItems.TcpWindowSize
TextFile.WriteLine "WINSEnableLMHostsLookup: " & SubItems.WINSEnableLMHostsLookup
TextFile.WriteLine "WINSHostLookupFile: " & SubItems.WINSHostLookupFile
TextFile.WriteLine "WINSPrimaryServer: " & SubItems.WINSPrimaryServer
TextFile.WriteLine "WINSScopeID: " & SubItems.WINSScopeID
TextFile.WriteLine "WINSSecondaryServer: " & SubItems.WINSSecondaryServer
TextFile.WriteLine "********************************************************************"
Next
TextFile.Close
OutFile.Run "notepad.exe c:\Win32_NetworkAdapterConfiguration.txt",1,True
No comments have been posted about Get the Network Adapter Configuration details using Win32_NetworkAdapterConfiguration WMI Class. Why not be the first to post a comment about Get the Network Adapter Configuration details using Win32_NetworkAdapterConfiguration WMI Class.
