Shulou(Shulou.com)06/03 Report--

This article mainly introduces VBS how to achieve the routing restart script, has a certain reference value, interested friends can refer to, I hope you can learn a lot after reading this article, the following let the editor take you to understand it.

The code is as follows:

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

Thank you for reading this article carefully. I hope the article "how to implement the routing restart script for VBS" shared by the editor will be helpful to everyone. At the same time, I also hope that you will support us and pay attention to the industry information channel. More related knowledge is waiting for you to learn!

Welcome to subscribe "Shulou Technology Information " to get latest news, interesting things and hot topics in the IT industry, and controls the hottest and latest Internet news, technology news and IT industry trends.