问下 如何批处理改写本地连接协议为自动获取IP地址？

'设置IPstrIPAddress=Array("172.31.234.36")'设置子网掩码strSubnetMask=Array("255.255.255.0")'设置网关DefaultIPGateway=Array("172.31.234.1")'设置跃点数GatewayCostMetric=Array("1")'设置DNS服务器DNSServer = Array("211.129.12.43", "211.129.14.134")strComputer="."Set objWMIService=GetObject("winmgmts:\\" & strComputer & "\root\cimv2")Set colNetAdapters=objWMIService.ExecQuery("Select * from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE")For Each objNetAdapter in colNetAdapters '设置IP和子网掩码 errEnable=objNetAdapter.EnableStatic(strIPAddress, strSubnetMask) '设置网关和跃点数 errEnable=objNetAdapter.SetGateways(DefaultIPGateway,GatewayCostMetric) '设置DNS errEnable=objNetAdapter.SetDNSServerSearchOrder(DNSServer) If errEnable = 0 Then WScript.Echo "The IP address has been changed." Else WScript.Echo "The IP address could not be changed." End If Exit For'只改变第一个网卡的信息Next

netsh interface ip set address name="本地连接" source=dhcpnetsh interface ip set dns name="本地连接" source=dhcp

谢谢楼上的两位 不过错了 你们的是设置IP和网络访问我的意思是原本设了IP 用批处理取消IP 改为自动获取IP地址