VBS 路由重启脚本

140 阅读 0 评论 93 点赞

我是靠谱客的博主稳重酸奶，这篇文章主要介绍VBS 路由重启脚本，现在分享给大家，希望可以做个参考。

复制代码代码如下:

Set sh=WScript.CreateObject("WScript.Shell") 
sh.Run "telnet 192.168.1.1" 
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