公司为一个活动目录域，域中有500台计算机，原来都是手工分配的IP地址。现准备通过DHCP分配IP地址。但如果一台台去改太麻烦了，想求助一下：不知道有没有脚本能设置原来是手工分配IP地址的计算机能够改成通过DHCP自动分配TCP/IP配置信息？如果有的话，我就可以再设一个组策略：客户机启动时自动运行这个脚本，就把网卡改过来了。" H) D3 ^" h& d+ X
谢谢！

strComputer = "."- Q- U: n, N$ C. }. w; j% a
Set objWMIService = GetObject("winmgmts:" _
# j3 T* W! @7 R8 s# w* w& T5 A8 p & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")% n- B! d3 n+ d2 L$ O2 m0 H ?% v! S
6 A0 |3 I4 |* b: X& `2 b% L! K
Set colNetAdapters = objWMIService.ExecQuery _0 ?# p" U4 D# g% _3 |
("Select * from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE")6 ~* S# r4 Y& B7 l5 o- t, x! Q" d

, g; j. |* ^0 N& ?+ \* dFor Each objNetAdapter In colNetAdapters- s9 b2 S; }! ]! a' j9 a* U
errEnable = objNetAdapter.EnableDHCP(), |3 U3 v3 I* s2 l! K
Next

我再来个批处理的：

复制内容到剪贴板

代码:

@echo off
netsh interface ip set address name="本地连接" source=dhcp
netsh interface ip set dns name="本地连接" source=static addr=202.106.192.152 register=PRIMARY :首选DNS
netsh interface ip add dns name="本地连接" addr=202.106.192.115 index=2 :备用DNS
netsh interface ip set wins name="本地连接" source=dhcp