win防锁屏小脚本

  1. 防锁屏.vbe
  2. 结束锁屏脚本

编写进度

防锁屏.vbe

Dim wshShell
Set wshShell = CreateObject("Wscript.Shell")
msgbox "µã»÷È·¶¨ºó£¬¿ªÊ¼¶¨Ê±Ä£Äâ¼üÅÌÊäÈ룬ÒÔ·ÀÖ¹ËøÆÁ¡£Òª½áÊøÄ£ÄâÔòÔËÐÐ ½áÊø.bat"
Do While 2>1
        wscript.Sleep 60000
        wshShell.SendKeys "{NumLock}"
        wshShell.SendKeys "{NumLock}"
Loop
vbscript复制代码

结束锁屏脚本

taskkill /f /im wscript.exe
vbscript复制代码

s


转载请注明来源,欢迎对文章中的引用来源进行考证,欢迎指出任何有错误或不够清晰的表达。可以在下面评论区评论,也可以邮件至 askding@qq.com

💰

未找到相关的 Issues 进行评论

请联系 @askDing 初始化创建

×

Help us with donation