VBS 路由重啟腳本
更新時間：2009年03月13日 22:50:49 作者：
用vbs實現(xiàn)路由器的重啟，時間上就是利用vbs模擬按鍵輸出。
復(fù)制代碼 代碼如下:
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
相關(guān)文章
下面的vbs類雖然簡單，但也看出來，vbs類的原理，大家可以根據(jù)自己的需要編寫2008-05-05
用來計算中文姓名的筆畫數(shù)的腳本,非常不錯2009-08-08
用vbs記錄屏幕保護程序的開始時間和結(jié)束時間...2007-03-03
用vbscript實現(xiàn)的強制殺系統(tǒng)進程的腳本代碼，主要用于一些殺毒軟件，占系統(tǒng)內(nèi)存或cpu，我們可以用下面的方法殺掉，黑人也必須殺掉殺毒軟件，才能進行下一步操作，不建議搞破壞。2008-05-05
用vbs遍歷文件并隨機顯示的腳本...2007-10-10
這篇文章主要介紹了VBS怎么獲取指定目錄下的文件列表,需要的朋友可以參考下2019-12-12
VBS教程：屬性-Key 屬性...2006-11-11
Win2003里用命令行刷新硬件列表，以掃描硬件改動的實現(xiàn)代碼
在Windows Server 2003里面實現(xiàn)用命令行刷新硬件列表，以掃描硬件改動，怎么實現(xiàn)2012-05-05
VBS教程：屬性-ShortName 屬性...2006-11-11
Stream、WshShell、WshUrlShortcut對象及Shell.Application的參數(shù)與使用
Stream、WshShell、WshUrlShortcut對象及Shell.Application的參數(shù)與使用...2007-03-03