当前位置: 首页 > 图文教程 > 脚本技术 > VBScript > CMD和vbs修改 IP地址及DNS的实现代码

VBScript
VBS教程:方法-Skip 方法
VBS教程:方法-Remove 方法
VBS教程:方法-ReadLine 方法
VBS教程:方法-ReadAll 方法
VBS教程:方法-Read 方法
VBS教程:方法-OpenTextFile 方法
VBS教程:方法-OpenAsTextStream 方法
VBS教程:方法-MoveFolder 方法
VBS教程:方法-MoveFile 方法
VBS教程:方法-Move 方法
VBS教程:方法-Keys 方法
VBS教程:方法-Items 方法
VBS教程:方法-GetTempName 方法
VBS教程:方法-GetSpecialFolder 方法
VBS教程:方法-GetParentFolderName 方法
VBS教程:方法-GetFolder 方法
VBS教程:方法-GetFileName 方法
VBS教程:方法-GetFile 方法
VBS教程:方法-GetExtensionName 方法
VBS教程:方法-GetDriveName 方法

VBScript 中的 CMD和vbs修改 IP地址及DNS的实现代码


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-11   浏览: 350 ::
收藏到网摘: n/a

修改IP
cmd /c netsh interface ip set address name=" 本地连接" source=static addr=211.82.56.253 mask=255.255.255.0 gateway=211.82.56.1 gwmetric=1
修改DNS
cmd /c netsh interface ip set dns name="本地连接" source=static addr=202.99.192.66

配置或更新IP地址:
wmic nicconfig where index=0 call enablestatic("192.168.1.5"), ("255.255.255.0") ;index=0说明是配置网络接口1。

配置网关(默认路由):
wmic nicconfig where index=0 call setgateways("192.168.1.1"),(1)

vbs

Const T_GATEWAY = "211.82.56.1" '网关
Const T_NEWDNS1 = "202.99.192.66" 'DNS1
Const T_NEWDNS2 = "60.221.248.43" 'DNS2
strWinMgmt="winmgmts:{impersonationLevel=impersonate}"
Set NICS = GetObject( strWinMgmt ).InstancesOf("Win32_NetworkAdapterConfiguration")
For Each NIC In NICS
If NIC.IPEnabled Then
NIC.SetDNSServerSearchOrder Array(T_NEWDNS1,T_NEWDNS2)
NIC.SetGateways Array(T_GATEWAY)
End If
Next