用vbs实现修改dns的网关脚本


Const T_GATEWAY = "1.1.1.1" '网关
Const T_NEWDNS1 = "2.2.2.2" 'DNS1
Const T_NEWDNS2 = "3.3.3.3" '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

无须重新启动,不管系统语言



相关阅读:
jquery validate使用攻略 第四步
用VBS修改IIS Metabase的代码
一个可分页的基于文本的PHP留言板源码
两个非常规ASP木马(可躲过扫描)
Linux系统GRUB的MD5加密方法
Asp.net Mvc Framework 七 (Filter及其执行顺序)
SQL Server 数据库管理常用的SQL和T-SQL语句
js 把字符串当函数执行的方法
Ajax与《Ajax基础教程
HTML5 与 XHTML2
Oracle表空间状态经验分享
关于Linux系统下Grub启动流程的讨论总结
MySQL 加密/压缩函数
如何通过W3C验证?
快速导航

Copyright © 2016 phpStudy | 皖ICP备18014864号-4