这是一个小工具
vbs脚本
Set vbObj=WScript.createObject("wscript.Shell")
msgbox "task is running"
for i=1 to 5
WScript.Sleep 60000
vbObj.SendKeys "{F7}"
'msgbox "sleep 1min current i is:" & i
next
'msgbox "will lock print"
bat_path=vbObj.CurrentDirectory & "\lock.bat"
vbObj.run bat_path
bat脚本
@echo off
rundll32.exe user32.dll,LockWorkStation