Automatisieren von TCP/IP-Netzwerken auf Clients

IPFilterSecurityEnabled

Boolean-Wert

TRUE gibt an, dass die IP-Portsicherheit global für alle IP-Netzwerkadapter aktiviert ist und die Sicherheitswerte der einzelnen Netzwerkadapter aktiv sind. Diese Eigenschaft wird mit folgenden Eigenschaften verwendet: IPSecPermitTCPPorts, IPSecPermitUDPPorts und IPSecPermitIPProtocols. FALSE gibt an, dass die IP-Filtersicherheit für alle Netzwerkadapter deaktiviert ist und der gesamte Port- und Protokollverkehr nicht gefiltert wird.

IPSecPermitTCPPorts

Zeichenfolgenarray

Array der Ports mit Zugriffsberechtigungen für TCP. Die Liste der Protokolle wird mit der EnableIPSec-Methode definiert. Diese Liste ist leer oder enthält numerische Werte. Der Wert 0 gibt an, dass alle Ports über Zugriffsrechte verfügen. Eine leere Zeichenfolge gibt an, dass keinem Port die Zugriffsberechtigung erteilt wurde, wenn die IPFilterSecurityEnabled-Eigenschaft auf TRUE festgelegt ist.

EnableIPFilterSec

IPFilterSecurityEnabled – Boolean-Wert

Statische Methode. Aktiviert TCP/IP-Filter global für alle IP-Netzwerkadapter. Wenn die Sicherheit aktiviert ist, können die funktionalen Sicherheitseigenschaften für jeden Netzwerkadapter mit der für Netzwerkadapter spezifischen EnableIPSec-Methode gesteuert werden.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32

On Error Resume Next

 strComputer = "."

 Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colNicConfig = objWMIService.ExecQuery _
 ("Select * From Win32_NetworkAdapterConfiguration Where IPEnabled = True")

 For Each objNicConfig in colNicConfig
  WScript.Echo VbCrLf & "Network Adapter " & objNicConfig.Index & _
   VbCrLf & "  " & objNicConfig.Description
  WScript.Echo "    IP Filter Security Enabled: " & _
   objNicConfig.IPFilterSecurityEnabled
  WScript.Echo "    Protocols Permitted over IP:"
  If Not IsNull(objNicConfig.IPSecPermitIPProtocols) Then
    For Each strIPProtocol In objNicConfig.IPSecPermitIPProtocols
      WScript.Echo "      " & strIPProtocol
    Next
  End If
  WScript.Echo "    TCP Ports Permitted:"
  If Not IsNull(objNicConfig.IPSecPermitTCPPorts) Then
    For Each strTCPPort In objNicConfig.IPSecPermitTCPPorts
      WScript.Echo "      " & strTCPPort
    Next
  End If
  WScript.Echo "    UDPPorts Permitted:"
  If Not IsNull(objNicConfig.IPSecPermitUDPPorts) Then
    For Each strUDPPort In objNicConfig.IPSecPermitUDPPorts
      WScript.Echo "      " & strUDPPort
    Next
  End If
Next

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20

On Error Resume Next

 strComputer = "."

Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set objNicConfig = objWMIService.Get("Win32_NetworkAdapterConfiguration")

 If Not objNicConfig.IPFilterSecurityEnabled Then
  intFilterReturn = objNicConfig.EnableIPFilterSec(True)
  If intFilterReturn = 0 Then
    WScript.Echo "IP Filtering enabled for all network adapters."
  ElseIf intFilterReturn = 1 Then
    WScript.Echo "IP Filtering enabled for all network adapters." & _
     VbCrLf & "Must reboot for changes to take effect."
  Else
    WScript.Echo "Unable to enable IP Filtering."
  End If
Else
  WScript.Echo "IP Filtering already enabled."
End If

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32

On Error Resume Next

 Const ALLOW_ALL = 0
arrPermittedTCPPorts = Array(ALLOW_ALL)
arrPermittedUDPPorts = Array(ALLOW_ALL)
arrPermittedIPProtocols = Array(ALLOW_ALL)

 strComputer = "."

 Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colNicConfig = objWMIService.ExecQuery _
 ("Select * From Win32_NetworkAdapterConfiguration Where IPEnabled = True")

 For Each objNicConfig in colNicConfig
  WScript.Echo VbCrLf & "  Network Adapter " & objNicConfig.Index
  If objNicConfig.IPFilterSecurityEnabled Then
    intIPSecReturn = objNicConfig.EnableIPSec(arrPermittedTCPPorts, _
     arrPermittedUDPPorts, arrPermittedIPProtocols)
    If intIPSecReturn = 0 Then
      WScript.Echo "  IP Filtering enabled for specified ports and protocols."
    ElseIf intIPSecReturn = 1 Then
      WScript.Echo "  IP Filtering enabled for specified ports and protocols." _
       & VbCrLf & "  Must reboot for changes to take effect."
    Else
      WScript.Echo "  Unable to enable IP Filtering for " & _
       "specified ports and protocols."
    End If
  Else
    WScript.Echo "  IP Filtering not enabled. Must enable before " & _
     "specifying port and protocols."
  End If
Next

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109

On Error Resume Next

 Const ALLOW_ALL = "0"
Const ALLOW_NONE = ""

 strComputer = "."
blnIPFilterSecurityEnabled = "False"
arrPermittedTCPPorts = Array("80", "443")
arrPermittedUDPPorts = Array(ALLOW_NONE)
arrPermittedIPProtocols = Array(ALLOW_ALL)

 Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colNicConfig = objWMIService.ExecQuery _
 ("Select * From Win32_NetworkAdapterConfiguration Where IPEnabled = True")
WScript.Echo VbCrLf & "Settings Before Enabling IP Filtering"

 For Each objNicConfig in colNicConfig
  blnIPFilterSecurityEnabled = objNicConfig.IPFilterSecurityEnabled
  WScript.Echo VbCrLf & "  Network Adapter " & objNicConfig.Index & VbCrLf & _
   "    IP Filtering Enabled: " & blnIPFilterSecurityEnabled
  WScript.Echo "    TCP Ports:"
  If Not IsNull(objNicConfig.IPSecPermitTCPPorts) Then
    For Each strTCPPort In objNicConfig.IPSecPermitTCPPorts
      WScript.Echo "      " & strTCPPort
    Next
  End If
  WScript.Echo "    UDP Ports:"
  If Not IsNull(objNicConfig.IPSecPermitUDPPorts) Then
    For Each strUDPPort In objNicConfig.IPSecPermitUDPPorts
      WScript.Echo "      " & strUDPPort
    Next
  End If
  WScript.Echo "    IP Protocols:"
  If Not IsNull(objNicConfig.IPSecPermitIPProtocols) Then
    For Each strIPProtocol In objNicConfig.IPSecPermitIPProtocols
      WScript.Echo "      " & strIPProtocol
    Next
  End If
Next

 If blnIPFilterSecurityEnabled = False Then
  WScript.Echo VbCrLf & "Enabling IP Filtering ..."
  Set objAllNicsConfig = objWMIService.Get("Win32_NetworkAdapterConfiguration")
  intFilterReturn = objAllNicsConfig.EnableIPFilterSec(True)
  If intFilterReturn = 0 Then
    WScript.Echo "  IP Filtering enabled for all network adapters."
    SpecifyFilters
  ElseIf intFilterReturn = 1 Then
    WScript.Echo "  IP Filtering enabled for all network adapters." _
     & VbCrLf & "  Must reboot for changes to take effect."
    SpecifyFilters
  Else
    WScript.Echo "  Unable to enable IP Filtering."
  End If
Else
  WScript.Echo VbCrLf & "IP Filtering already enabled for all network adapters."
  SpecifyFilters
End If

 Set colNicConfig = objWMIService.ExecQuery _
 ("Select * From Win32_NetworkAdapterConfiguration Where IPEnabled = True")
WScript.Echo VbCrLf & "Settings After Enabling IP Filtering"

 For Each objNicConfig in colNicConfig
  WScript.Echo VbCrLf & "  Network Adapter " & objNicConfig.Index & VbCrLf & _
   "    IP Filtering Enabled: " & objNicConfig.IPFilterSecurityEnabled
  WScript.Echo "    TCP Ports:"
  If Not IsNull(objNicConfig.IPSecPermitTCPPorts) Then
    For Each strTCPPort In objNicConfig.IPSecPermitTCPPorts
      WScript.Echo "      " & strTCPPort
    Next
  End If
  WScript.Echo "    UDP Ports:"
  If Not IsNull(objNicConfig.IPSecPermitUDPPorts) Then
    For Each strUDPPort In objNicConfig.IPSecPermitUDPPorts
      WScript.Echo "      " & strUDPPort
    Next
  End If
  WScript.Echo "    IP Protocols:"
  If Not IsNull(objNicConfig.IPSecPermitIPProtocols) Then
    For Each strIPProtocol In objNicConfig.IPSecPermitIPProtocols
      WScript.Echo "      " & strIPProtocol
    Next
  End If
Next

 '******************************************************************************

 Sub SpecifyFilters

 Set colNicConfig = objWMIService.ExecQuery _
 ("Select * From Win32_NetworkAdapterConfiguration Where IPEnabled = True")
For Each objNicConfig in colNicConfig
  intIPSecReturn = objNicConfig.EnableIPSec(arrPermittedTCPPorts, _
   arrPermittedUDPPorts, arrPermittedIPProtocols)
  If intIPSecReturn = 0 Then
    WScript.Echo "  Filters enabled on " & _
     objNicConfig.Index & " for specified ports and protocols."
  ElseIf intIPSecReturn = 1 Then
    WScript.Echo "  Filters enabled on " & _
     objNicConfig.Index & " for specified ports and protocols." _
     & VbCrLf & "  Must reboot for changes to take effect."
  Else
    WScript.Echo "  Unable to enable filters on " & _
     objNicConfig.Index & " for specified ports and protocols."
  End If
Next

 End Sub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75

On Error Resume Next

 strComputer = "."

 Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colNicConfig = objWMIService.ExecQuery _
 ("Select * From Win32_NetworkAdapterConfiguration Where IPEnabled = True")

 WScript.Echo VbCrLf & "IPSec and TCP/IP Filtering Settings"

 For Each objNicConfig in colNicConfig
  WScript.Echo VbCrLf & "  Network Adapter " & objNicConfig.Index & _
   VbCrLf & "    IP Filtering Enabled: " & _
   objNicConfig.IPFilterSecurityEnabled
  WScript.Echo "    TCP Ports:"
  If Not IsNull(objNicConfig.IPSecPermitTCPPorts) Then
        For Each strTCPPort In objNicConfig.IPSecPermitTCPPorts
            WScript.Echo "      " & strTCPPort
        Next
  End If
  WScript.Echo "    UDP Ports:"
  If Not IsNull(objNicConfig.IPSecPermitUDPPorts) Then
    For Each strUDPPort In objNicConfig.IPSecPermitUDPPorts
      WScript.Echo "      " & strUDPPort
    Next
  End If
  WScript.Echo "    IP Protocols:"
  If Not IsNull(objNicConfig.IPSecPermitIPProtocols) Then
    For Each strIPProtocol In objNicConfig.IPSecPermitIPProtocols
      WScript.Echo "      " & strIPProtocol
    Next
  End If
  If objNicConfig.IPFilterSecurityEnabled Then
    intDisableReturn = objNicConfig.DisableIPSec
    If intDisableReturn = 0 Then
      WScript.Echo "    IP Filtering disabled."
    ElseIf intDisableReturn = 1 Then
      WScript.Echo "    IP Filtering disabled." & _
       VbCrLf & "    Must reboot for changes to take effect."
    Else
      WScript.Echo "    Unable to disable IP Filtering."
    End If
  Else
    WScript.Echo "    IP Filtering already disabled."
  End If
Next

 Set colNicConfig = objWMIService.ExecQuery _
 ("Select * From Win32_NetworkAdapterConfiguration Where IPEnabled = True")

 WScript.Echo VbCrLf & "Settings After Operation"

 For Each objNicConfig in colNicConfig
  WScript.Echo VbCrLf & "  Network Adapter " & objNicConfig.Index & _
   VbCrLf & "    IP Filtering Enabled: " & _
   objNicConfig.IPFilterSecurityEnabled
  WScript.Echo "    TCP Ports:"
  If Not IsNull(objNicConfig.IPSecPermitTCPPorts) Then
    For Each strTCPPort In objNicConfig.IPSecPermitTCPPorts
      WScript.Echo "      " & strTCPPort
    Next
  End If
  WScript.Echo "    UDP Ports:"
  If Not IsNull(objNicConfig.IPSecPermitUDPPorts) Then
    For Each strUDPPort In objNicConfig.IPSecPermitUDPPorts
      WScript.Echo "      " & strUDPPort
    Next
  End If
  WScript.Echo "    IP Protocols:"
  If Not IsNull(objNicConfig.IPSecPermitIPProtocols) Then
    For Each strIPProtocol In objNicConfig.IPSecPermitIPProtocols
      WScript.Echo "      " & strIPProtocol
    Next
  End If
Next

ArpAlwaysSourceRoute

Boolean-Wert

True gibt an, dass TCP/IP ARP-Abfragen (Address Resolution Protocol) mit aktiviertem Quellrouting in Token Ring-Netzwerken überträgt.

Standardmäßig (False) werden ARP-Abfragen zuerst ohne Quellrouting ausgeführt. Anschließend wird der Vorgang mit aktiviertem Quellrouting wiederholt, wenn keine Antwort empfangen wird. Quellrouting ermöglicht das Routing von Netzwerkpaketen in unterschiedlichen Netzwerktypen.

SetArpAlwaysSourceRoute

ArpAlwaysSourceRoute – Boolean-Wert

Statische Methode. Legt die Übertragung von ARP-Abfragen von TCP/IP fest.

Wenn der Parameter auf True festgelegt ist, überträgt TCP/IP ARP-Abfragen mit aktiviertem Quellrouting in Token Ring-Netzwerken.

Standardmäßig überträgt der Stapel ARP-Abfragen zuerst ohne Quellrouting. Anschließend wird der Vorgang mit aktiviertem Quellrouting wiederholt, wenn keine Antwort empfangen wird.

KeepAliveInterval

Uint32

Einheiten: Millisekunden

Intervall zwischen erneuten Keep Alive-Übertragungen bis zum Empfang einer Antwort. Nach dem Empfang einer Antwort wird die Verzögerung bis zur nächsten Keep Alive-Übertragung erneut vom Wert der KeepAliveTime-Eigenschaft gesteuert. Die Verbindung wird abgebrochen, nachdem die von TcpMaxDataRetransmissions angegebene Anzahl der erneuten Übertragungen unbeantwortet bleiben. Standard: 1000, Gültiger Bereich:
1–xFFFFFFFF.

MTU

Uint32

Einheiten: Bytes

Überschreibt die standardmäßige Maximum Transmission Unit (MTU – maximale Übertragungseinheit) für eine Netzwerkschnittstelle. Die MTU ist die maximale Paketgröße (einschließlich Übertragungsheader), die über das Netzwerk übertragen wird. Das IP-Datagramm kann mehrere Pakete umfassen. Der Wertebereich umfasst die minimale Paketgröße (68) bis zur vom Netzwerk unterstützten MTU.

PMTUDiscoveryEnabled

Boolean-Wert

TRUE gibt an, dass der MTU-Pfad über den Pfad zum Remotehost identifiziert wird. Durch Identifizieren des MTU-Pfades und Beschränken der TCP-Segmente auf diese Größe kann TCP die Fragmentierung bei Routern auf Pfaden vermeiden, die Netzwerke mit unterschiedlichen MTUs verbinden. Die Fragmentierung wirkt sich nachteilig auf den TCP-Durchsatz und die Netzwerkauslastung aus. Durch Festlegen dieses Parameters auf FALSE wird eine MTU von 576 Bytes für alle Verbindungen außerhalb des lokalen Subnetzes verwendet. Der Standardwert ist TRUE.

TcpMaxDataRetransmissions

Uint32

Gibt an, wie oft TCP einzelne Datensegmente erneut überträgt, bevor die Verbindung abgebrochen wird. Das Zeitlimit wird mit jeder erneuten Übertragung verdoppelt. Standard: 5, Gültiger Bereich: 0-0xFFFFFFFF.

TcpUseRFC1122UrgentPointer

Boolean-Wert

TRUE gibt an, dass TCP die RFC 1122-Spezifikation für dringende Daten verwendet. FALSE (Standardeinstellung) gibt an, dass TCP den Modus von BSD-abgeleiteten Systemen (Berkeley Software Design) verwendet. Die zwei Mechanismen interpretieren den Dringlichkeitszeiger unterschiedlich und können nicht zusammen verwendet werden. Windows 2000 und Windows NT 3.51 oder höher verwenden standardmäßig den BSD-Modus.

SetKeepAliveInterval

KeepAliveInterval – int32

Wert (in Millisekunden) für das Intervall zwischen erneuten Keep Alive-Übertragungen bis zum Empfang einer Antwort.

Statische Methode. Legt das Intervall fest, das die erneuten Keep Alive-Übertragungen bis zum Empfang einer Antwort trennt. Nach dem Empfang einer Antwort wird die Verzögerung bis zur nächsten Keep Alive-Übertragung erneut vom Wert der KeepAliveTime-Eigenschaft gesteuert. Die Verbindung wird abgebrochen, nachdem die von der TcpMaxDataRetransmissions-Eigenschaft angegebene Anzahl der erneuten Übertragungen unbeantwortet bleiben.

SetMTU

Windows Server 2003: Diese Methode wird nicht unterstützt. Es gibt keinen Ersatz, und die Werte entsprechen nicht dem beabsichtigten Zweck der Methode.

MTU – int32

Die standardmäßige Maximum Transmission Unit (MTU – maximale Übertragungseinheit) für eine Netzwerkschnittstelle. Der Wertebereich umfasst die minimale Paketgröße (68) bis zur vom Netzwerk unterstützten MTU.

Statische Methode. Legt die Standard-MTU für eine Netzwerkschnittstelle fest. Die MTU ist die maximale Paketgröße (in Bytes), die über das Netzwerk übertragen wird. Die Größe umfasst den Übertragungsheader.

Beachten Sie, dass ein IP-Datagramm mehrere Pakete umfassen kann. Wenn die Werte die für das jeweilige Netzwerk angegebene Standardgröße überschreiten, wird für die Übertragung die Standard-MTU des Netzwerks verwendet. Bei Werten unter 68 wird für die Übertragung eine MTU von 68 Bytes verwendet.

SetPMTUDiscovery

PMTUDiscoveryEnabled – Boolean-Wert

TRUE gibt an, dass TCP für die Ermittlung der MTU oder der größten Paketgröße über den Pfad zum Remotehost aktiviert ist. Der Standardwert ist TRUE.

Statische Methode. Aktiviert die MTU-Ermittlung über den Pfad zum Remotehost. Durch Identifizieren der Pfad-MTU und Beschränken der TCP-Segmente auf diese Größe kann TCP die Fragmentierung bei Routern auf Pfaden vermeiden, die Netzwerke mit unterschiedlichen MTUs verbinden. Die Fragmentierung wirkt sich nachteilig auf den TCP-Durchsatz und die Netzwerkauslastung aus. Durch Festlegen dieses Parameters auf FALSE wird eine MTU von 576 Bytes für alle Verbindungen außerhalb des lokalen Subnetzes verwendet.

SetTcpMaxDataRetransmissions

TcpMaxDataRetransmissions – int32

Anzahl der Versuche, die TCP unternimmt, um einzelne Datensegmente erneut zu übertragen, bevor die Verbindung abgebrochen wird. Gültiger Bereich: 0-0xFFFFFFFF.

Statische Methode. Legt fest, wie oft TCP einzelne Datensegmente erneut überträgt, bevor die Verbindung abgebrochen wird. Das Zeitlimit wird mit jeder erneuten Übertragung verdoppelt.

SetTcpUseRFC1122UrgentPointer

TcpUseRFC1122UrgentPointer – Boolean-Wert

TRUE gibt an, dass TCP die RFC 1122-Spezifikation verwendet. FALSE gibt an, dass dringende Daten in dem von BSD-abgeleiteten Systemen verwendeten Modus gesendet werden.

Statische Methode. Gibt an, ob TCP die RFC 1122-Spezifikation für dringende Daten oder den Modus von BSD-abgeleiteten Systemen (Berkeley Software Design) verwendet. Die zwei Mechanismen interpretieren den Dringlichkeitszeiger im TCP-Header und die Länge der dringenden Daten unterschiedlich. Sie können nicht zusammen verwendet werden. Windows 2000 und Windows NT 3.51 oder höher verwenden standardmäßig den BSD-Modus.

DefaultTOS

Uint8

TOS-Standardwert (Type Of Service) im Header ausgehender IP-Pakete. Die Werte sind in RFC 791 definiert. Standard: 0, Gültiger Bereich: 0-255.

IPUseZeroBroadcast

Boolean-Wert

TRUE gibt an, dass IP-Zero-Broadcasts (0.0.0.0) verwendet werden. Das System verwendet in diesem Fall normale Broadcasts (255.255.255.255). Computersysteme verwenden im Allgemeinen normale Broadcasts, - von BSD-Implementationen abgeleitete Systeme verwenden jedoch Zero-Broadcasts. Systeme, die unterschiedliche Broadcasts verwenden, können nicht in demselben Netzwerk ausgeführt werden. Der Standardwert ist FALSE.

SetDefaultTOS

Veraltet. Anwendungen sollten die QoS-API zum Ändern von TOS-Bits verwenden.

DefaultTOS – Zeichenfolge

Der Parameter stellt den TOS-Wert (Type Of Service) im Header ausgehender IP-Pakete dar. Eine Definition der Werte finden Sie in RFC 791.

Statische Methode. Legt den TOS-Standardwert (Type Of Service) im Header ausgehender IP-Pakete fest.

SetIPUseZeroBroadcast

IPUseZeroBroadcast – Boolean-Wert

TRUE gibt an, dass IP-Zero-Broadcasts verwendet werden. Der Standardwert ist FALSE.

Statische Methode. Legt die Verwendung von IP-Zero-Broadcasts fest. Wenn der IPUseZeroBroadcast-Parameter auf TRUE festgelegt ist, verwendet IP Zero-Broadcasts (0.0.0.0) anstelle von One-Broadcasts (255.255.255.255). Die meisten Systeme verwenden One-Broadcasts, aber von BSD-Implementationen abgeleitete Systeme verwenden Zero-Broadcasts. Systeme, die unterschiedliche Broadcasts verwenden, können nicht in demselben Netzwerk ausgeführt werden.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42

On Error Resume Next

 strComputer = "."

 Set objWMIService = GetObject("winmgmts:" & _
 "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colNicConfigs = objWMIService.ExecQuery("SELECT * FROM " & _
 "Win32_NetworkAdapterConfiguration WHERE IPEnabled = True")

 WScript.Echo VbCrLf & "ARP, IP and TCP packet settings"
WScript.Echo VbCrLf & "Host Name: " & strComputer

 For Each objNicConfig in colNicConfigs
  WScript.Echo VbCrLf & "  Network Adapter: " & objNicConfig.Index & _
   VbCrLf & "   " & objNicConfig.Description
  WScript.Echo VbCrLf & "   ARP Settings:"
  WScript.Echo "    ARP queries use source routing on Token Ring: " & _
   objNicConfig.ArpAlwaysSourceRoute
  WScript.Echo "    ARP uses SNAP encoding on Ethernet: " & _
   objNicConfig.ArpUseEtherSNAP
  WScript.Echo VbCrLf & "   IP packet settings:"
  WScript.Echo "    Default Type Of Service: " & objNicConfig.DefaultTOS
  WScript.Echo "    Default Time To Live: " & objNicConfig.DefaultTTL
  WScript.Echo "    IP uses zeros-broadcasts: " & _
   objNicConfig.IPUseZeroBroadcast
  WScript.Echo VbCrLf & "   TCP Settings:"
  WScript.Echo "    Keep Alive Interval: " & objNicConfig.KeepAliveInterval
  WScript.Echo "    Keep Alive Time: " & objNicConfig.KeepAliveTime
  WScript.Echo "    Maximum Transmission Unit: " & objNicConfig.MTU
  WScript.Echo "    Maximum Transmission Unit path discovery enabled: " & _
   objNicConfig.PMTUDiscoveryEnabled
  WScript.Echo "    Maximum number of connect request retransmissions: " & _
   objNicConfig.TcpMaxConnectRetransmissions
  WScript.Echo "    Maximum number of data segment retransmissions: " & _
   objNicConfig.TcpMaxDataRetransmissions
  WScript.Echo "    Maximum number of simultaneous open connections: " & _
   objNicConfig.TcpNumConnections
  WScript.Echo "    Use RFC 1122 specification for urgent data: " & _
   objNicConfig.TcpUseRFC1122UrgentPointer
  WScript.Echo "    Maximum TCP receive window size: " & _
   objNicConfig.TcpWindowSize
Next

IPXEnabled

Boolean-Wert

TRUE gibt an, dass das IPX-Protokoll für diesen Adapter gebunden und aktiviert ist.

IPXFrameType

Uint32-Array

Array von Frametypkennungen. Die Werte in diesem Array entsprechen den Elementen in IPXNetworkNumber.

O = Ethernet II

1 = Ethernet 802.3

2 = Ethernet 802.2

3 = Ethernet SNAP

255 = AUTO

IPXNetworkNumber

Zeichenfolgenarray

Array von Zeichen, die eine Kombination aus Frames und Netzwerkadapter auf dem Computersystem eindeutig kennzeichnen. Das NWLink IPX/SPX/NetBIOS-kompatible Transportprotokoll (NWLink) unter Windows 2000 und Windows NT 4.0 und höher verwendet zwei unterschiedliche Netzwerknummerntypen. Diese Nummer wird auch als externe Netzwerknummer bezeichnet. Sie muss für jedes Netzwerksegment eindeutig sein. Die Reihenfolge in dieser Zeichenfolgenliste entspricht (pro Element) den Elementen in der IPXFrameType-Eigenschaft.

SetIPXFrameTypeNetworkPairs

IPXNetworkNumber – Zeichenfolgenarray

Array von Zeichen, die einen Adapter auf dem Computersystem eindeutig kennzeichnen. Das NWLink-Protokoll unter Windows 2000 und Windows NT 3.51 oder höher verwendet zwei unterschiedliche Netzwerknummerntypen. Diese Nummer wird auch als externe Netzwerknummer bezeichnet. Sie muss für jedes Netzwerksegment eindeutig sein. Für die Werte in dieser Zeichenfolgenliste ist ein entsprechender Wert im IPXFrameType-Parameter erforderlich, der den für dieses Netzwerk verwendeten Paketframetyp identifiziert.

IPXFrameType – int32-Array

Array (mit ganzen Zahlen) von Frametypkennungen. Die Werte in diesem Array entsprechen den Elementen im IPXNetworkNumber-Parameter.

Statische Methode. Legt die IPX-Netzwerknummern/-Framepaare für diesen Netzwerkadapter fest. Windows 2000 und Windows NT 3.51 oder höher verwenden eine IPX-Netzwerknummer für Routingzwecke. Diese Nummer wird jeder konfigurierten Kombination aus Frametyp und Netzwerkadapter auf dem Computersystem zugewiesen. Diese Nummer wird auch als externe Netzwerknummer bezeichnet. Sie muss für jedes Netzwerksegment eindeutig sein. Wenn der Frametyp auf AUTO festgelegt ist, sollte die Netzwerknummer 0 sein.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49

On Error Resume Next

 strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
 & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colNicConfigs = objWMIService.ExecQuery _
 ("SELECT * FROM Win32_NetworkAdapterConfiguration")

 WScript.Echo VbCrLf & "IPX Settings"

 For Each objNicConfig In colNicConfigs
  WScript.Echo VbCrLf & "  Network Adapter " & objNicConfig.Index
  WScript.Echo "    " & objNicConfig.Description
  WScript.Echo "    IPX Enabled: " & objNicConfig.IPXEnabled
  If objNicConfig.IPXEnabled Then
    WScript.Echo "    IPX Address: " & objNicConfig.IPXAddress
    WScript.Echo "    IPX Network Number(s):"
    If Not IsNull(objNicConfig.IPXNetworkNumber) Then
      For Each strIPXNetworkNumber In objNicConfig.IPXNetworkNumber
        WScript.Echo "        " & strIPXNetworkNumber
      Next
    End If
    WScript.Echo "    IPX Virtual Network Number: " & _
     objNicConfig.IPXVirtualNetNumber
    WScript.Echo "    IPX Frame Type(s):"
    If Not IsNull(objNicConfig.IPXFrameType) Then
      For Each intIPXFrameType In objNicConfig.IPXFrameType
        Select Case intIPXFrameType
          Case 0 strIPXFrameType = "Ethernet II"
          Case 1 strIPXFrameType = "Ethernet 802.3"
          Case 2 strIPXFrameType = "Ethernet 802.2"
          Case 3 strIPXFrameType = "Ethernet SNAP"
          Case 255 strIPXFrameType = "AUTO"
          Case Else strIPXFrameType = "Frame type cannot be determined."
        End Select
        WScript.Echo "        " & strIPXFrameType
      Next
    End If
    intIPXMediaType = objNicConfig.IPXMediaType
    Select Case intIPXMediaType
      Case 1 strIPXMediaType = "Ethernet"
      Case 2 strIPXMediaType = "Token ring"
      Case 3 strIPXMediaType = "FDDI"
      Case 255 strIPXMediaType = "ARCNET"
      Case Else strIPXMediaType = "Media type cannot be determined."
    End Select
    WScript.Echo "    IPX Media Type: " & strIPXMediaType
  End If
Next

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17

On Error Resume Next

 strComputer = "."

 Set objWMIService = GetObject("winmgmts:" _
 & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colNetProtocols = objWMIService.ExecQuery _
 ("SELECT * FROM Win32_NetworkProtocol")

 WScript.Echo VbCrLf & "Host: " & strComputer & VbCrLf & _
 "  Network Protocols Installed"

 For Each objNetProtocol In colNetProtocols
  WScript.Echo VbCrLf & "    Protocol Name: " & objNetProtocol.Name
  WScript.Echo "      Description: " & objNetProtocol.Description
  WScript.Echo "      Status: " & objNetProtocol.Status
Next

Arp.exe

Windows-Betriebssysteme¹

Hostname.exe

Windows-Betriebssysteme

Ipseccmd.exe

Windows-Betriebssysteme

Netconnections.vbs

Windows 2000 Resource Kit

Netipfilteringconfig.pl

Windows 2000 Resource Kit

Net.exe

Windows-Betriebssysteme

Netsh.exe

Windows-Betriebssysteme

Networkprotocol.vbs

Windows 2000 Resource Kit

Protocolbinding.vbs

Windows 2000 Resource Kit

Remotebefehlsdienst (Rcmd.exe und Rcmdsvc.exe)

Windows 2000 Resource Kit

Rsh.exe und Rshsvc.exe: TCP/IP Remote Shell Service

Windows 2000 Resource Kit

Telnet.exe

Windows-Betriebssysteme

Tzedit.exe: Time Zone Editor

Windows 2000 Resource Kit – GUI-Tool

WshController

WshShell

Win32_NetworkAdapterConfiguration

Win32_NetworkAdapterSetting (stellt die Beziehung zwischen Win32_NetworkAdapter und Win32_NetworkAdapterConfiguration dar)

Win32_OperatingSystem

HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters

HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Netman