黑基网 首页 学院 电脑技术 查看内容

VBS 路由重启脚本

2009-7-14 13:05| 投稿: computer

摘要:   Set sh=WScript.CreateObject("WScript.Shell")  sh.Run "telnet 192.168.1.1" '修改为自己的网关IP  WScript.Sle...
  Set sh=WScript.CreateObject("WScript.Shell")  sh.Run "telnet 192.168.1.1" '修改为自己的网关IP  WScript.Sleep 1000  sh.SendKeys "admin{ENTER}"  WScript.Sleep 1000  sh.SendKeys "admin{ENTER}"  WScript.Sleep 1000  sh.SendKeys "reboot{ENTER}"  WScript.Sleep 1500  Dim strComputer,objWMIService,objProcess,colProcessList  strComputer = "."  Set objWMIService = GetObject("winmgmts:" &  "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")  Set colProcessList = objWMIService.ExecQuery ("Select * from Win32_Process  Where Name = 'telnet.exe'")  For Each objProcess in colProcessList  objProcess.Terminate()  next
小编推荐:欲学习电脑技术、系统维护、网络管理、编程开发和安全攻防等高端IT技术,请 点击这里 注册黑基账号,公开课频道价值万元IT培训教程免费学,让您少走弯路、事半功倍,好工作升职加薪!



免责声明:本文由投稿者转载自互联网,版权归原作者所有,文中所述不代表本站观点,若有侵权或转载等不当之处请联系我们处理,让我们一起为维护良好的互联网秩序而努力!联系方式见网站首页右下角。


鲜花

握手

雷人

路过

鸡蛋

相关阅读

最新评论


新出炉

返回顶部