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

结束锁屏脚本

taskkill /f /im wscript.exe

s


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

💰

×

Help us with donation