vbs实现的定时关机、重启的脚本和程序
作者 佚名
来源 ASP编程
浏览
发布时间 2013-07-09
将下面代码存为vbs文件,如:shutdown.vbs,然后双击或在文件上点右 键选择以命令提示打开,如果到了你设置重启的时候,系统会出现关机的对话 框。 直接下面代码程序会出现关机的对话框,最后的回车注释掉了,正常使用 时,请去掉注释符。 以下代码在window2000下通过。 复制代码 代码如下: ''定时关机或重启的脚本,在windows2000下通过 ''codebyhaiwa2005-11-7 dimActionID ActionID=1''0注销,1关机,2重启, ActionTime="2005-11-713:42:30"''关机或重启时间 functionShutDown() dimobjShell SetobjShell=WScript.CreateObject("Wscript.Shell") dimApplication setApplication=CreateObject("Shell.Application.1") Application.ShutdownWindows() dimupi forupi=0to4 WScript.Sleep(50) objShell.sendKeys("{UP}") next Forupi=1toActionID WScript.Sleep(50) objShell.sendKeys("{DOWN}") next ''使用时,请把下行的注释符去掉 ''objShell.sendKeys("{ENTER}") endfunction Whiletrue ifDateDiff("s",Now,ActionTime)<0then ShutDown() endif WScript.Sleep(5*1000) wend |
凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务,公司网站:http://www.lingzhong.cn 为了给广大客户了解更多的技术信息,本技术文章收集来源于网络,凌众科技尊重文章作者的版权,如果有涉及你的版权有必要删除你的文章,请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢! |
你可能对下面的文章感兴趣
关于vbs实现的定时关机、重启的脚本和程序的所有评论