Const STR_GATEWAY = "192.168.1.254"
Const STR_NEWDNS1 = "221.6.4.67"
Const STR_NEWDNS2 = "61.177.7.1"
Set fs=CreateObject("Scripting.FileSystemObject")
strWinMgmt="winmgmts:{impersonationLevel=impersonate}"
Set objNICs = GetObject( strWinMgmt ).InstancesOf("Win32_NetworkAdapterConfiguration")
For Each objNIC In objNICs
If objNIC.IPEnabled Then
objNIC.SetDNSServerSearchOrder Array(STR_NEWDNS1,STR_NEWDNS2)
objNIC.SetGateways Array(STR_GATEWAY)
End If
Next
修改192.168.1.254为您的网关地址。
修改221.6.4.67为主DNS地址。
修改61.177.7.1为副DNS地址
【VBS不需重启修改DNS和网关】相关文章：
★ myeclipse创建spring配置文件正确却显示红叉该怎么办?
★ Android Studio 官方最新版下载地址(支持国内下载)
★ myeclipse怎么导出war包？Web项目导出war包的方法
★ win8安装python环境和pip、easy_install工具
★ SharePoint 2007图文开发教程(1) 简介，安装，配置及创建Web应用程序
★ sql server 2008怎么安装？sql server 2008安装视频教程