Win32_NetworkAdapterConfiguration

最新推荐文章于 2024-04-25 14:06:21 发布

转载最新推荐文章于 2024-04-25 14:06:21 发布 · 1.2k 阅读

0 ·

CC 4.0 BY-SA版权

原文链接：http://www.cnblogs.com/jevan/archive/2011/03/01/1967734.html

文章标签：

#c# #python

本文介绍使用VBScript脚本为Windows系统中的指定网卡配置静态IP地址的方法。通过Win32_NetworkAdapterConfiguration WMI类，脚本能够实现设置IP地址、子网掩码及默认网关等功能。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

1     strComputer = "."
2     Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
3
4 '    Set colNetAdapters = objWMIService.ExecQuery (_
5 '        "Select * from Win32_NetworkAdapterConfiguration Where Index=8")
6 '   Index=8，导致硬件更换后网卡序列号不对。
7     Set colNetAdapters = objWMIService.ExecQuery (_
8         "Select * from Win32_NetworkAdapterConfiguration where IPEnabled=True")
9
10     strIPAddress = Array("192.168.188.109")
11     strSubnetMask = Array("255.255.255.0")
12     strGateway = Array("192.168.188.100")
13     strGatewayMetric = Array(1)
14 '    If colNetAdapters Is Nothing Then
15 '        MsgBox "不能创建colNetAdapters对象。"
16 '    End If
17
18     For Each objNetAdapter in colNetAdapters
19 '        WScript.Echo objNetAdapter.Caption  'Atheros AR8131 PCI-E Gigabit Ethernet Controller
20         '修改指定网卡的IP
21         If Left(objNetAdapter.Description,Len("Atheros AR8131"))="Atheros AR8131" Then
22             errEnable = objNetAdapter.EnableStatic(strIPAddress, strSubnetMask)
23             errGateways = objNetAdapter.SetGateways(strGateway, strGatewaymetric)
24         End If
25     Next
26
27 '    参考资料：
28 '    http://social.msdn.microsoft.com/Forums/zh-CN/windowssdk/thread/466fa3b8-9179-4244-9b83-5f8ffc6825bc
29 '    http://topic.youkuaiyun.com/u/20100720/17/08148f61-926a-4a94-8ebd-3edcde9a5c0a.html

转载于:https://www.cnblogs.com/jevan/archive/2011/03/01/1967734.html