gpt4 book ai didi

自己写的一个定时关机或重启的vbs脚本

转载 作者:qq735679552 更新时间:2022-09-29 22:32:09 29 4
gpt4 key购买 nike

CFSDN坚持开源创造价值,我们致力于搭建一个资源共享平台,让每一个IT人在这里找到属于你的精彩世界.

这篇CFSDN的博客文章自己写的一个定时关机或重启的vbs脚本由作者收集整理,如果你对这篇文章有兴趣,记得点赞哟.

  1. dim ActionID  
  2. ActionID = 1    '0注销,1关机,2重启,  
  3. ActionTime = "2006-1-4 13:42:30"    '关机或重启时间  
  4.  
  5. function ShutDown()  
  6.     dim objShell  
  7.     Set objShell = WScript.CreateObject("Wscript.Shell")  
  8.  
  9.     dim Application  
  10.     set Application = CreateObject("Shell.Application.1")  
  11.     Application.ShutdownWindows()  
  12.     dim upi  
  13.     for upi = 0 to 4  
  14.         WScript.Sleep(50)  
  15.         objShell.sendKeys("{UP}")  
  16.     next  
  17.     For upi = 1 to ActionID  
  18.         WScript.Sleep(50)  
  19.         objShell.sendKeys("{DOWN}")  
  20.     next  
  21.     '使用时,请把下行的注释符去掉  
  22.     'objShell.sendKeys("{ENTER}")  
  23. end function  
  24.  
  25. While true  
  26.     if DateDiff("s", Now, ActionTime) < 0 then  
  27.         ShutDown()  
  28.     end if  
  29.     WScript.Sleep(5*1000)  
  30. wend  
  31.  
  32.  
  33. '将上面代码存为vbs文件,如:shutdown.vbs,然后双击或在文件上点右键选择以命令提示打开,  
  34. '如果到了你设置重启的时候,系统会出现关机的对话框。  
  35. '直接下面代码程序会出现关机的对话框,最后的回车注释掉了,正常使用时,请去掉注释符。   

最后此篇关于自己写的一个定时关机或重启的vbs脚本的文章就讲到这里了,如果你想了解更多关于自己写的一个定时关机或重启的vbs脚本的内容请搜索CFSDN的文章或继续浏览相关文章,希望大家以后支持我的博客! 。

29 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com