背景介绍
有些公司出于安全和保密工作考虑，会通过 Windows 组策略强制所有办公电脑在无操作的情况下 5 分钟或者 10 分钟自动锁屏，避免无关人士看到不该看的内容。作为程序员，十分反感这种一刀切的方案，一来很容易打断思路，比如正在写代码或者向别人展示时，突然锁屏了就挺恶心的；二来每次锁屏后都要输入密码，这简直就是浪费生命，不能忍！
为了解决这个问题，我们可以编写一个简单的 vbs 脚本，在锁屏周期内模拟按键操作，从而避免 Windows 桌面被锁屏。之所以使用 vbs 脚本，而不是 Python、JavaScript 等更流行的高级语言，主要是因为这个程序的需求特别简单，而且 vbs 脚本可以在 Windows 系统中直接运行，不需要安装任何依赖。
脚本程序
下面给出两个脚本，你可以将它们命名为 never_lock.vbs 文件（先在 Windows 系统新建一个 txt 文本文件，粘贴代码，然后修改文件名）。
【复杂版本】
Set ws=Wscript.CreateObject("Wscript.Shell")
If ws.expandenvironmentstrings("%strikkeyflag%")=("on")Then
wscript.echo("Screen Never Lockout")
ws.Environment("user").Item("strikkeyflag")="off"
set mi=getobject("winmgmts:win32_process").instances_
for each p in mi
if ucase(p.name)=ucase("wscript.exe")then
p.terminate
End If
Next
wscript.quit
Else
wscript.echo("Screen Never Lockout")
ws.Environment("user").Item("strikkeyflag")="on"
do
set WshShell = CreateObject("WScript.Shell")
WshShell.SendKeys"{ScrollLock}"
wscript.sleep(280000) 'ms
Loop
end if
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
- 18
- 19
- 20
【简单版本】
'先定义一个Shell对象
Set WshShell = WScript.CreateObject("WScript.Shell")
'设置成正需要接续的时间
do
'设置成比屏保时间短点就可以
WScript.Sleep 60000 '1min 60000ms
WshShell.SendKeys "{ScrollLock}"
loop
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
在 Windows 系统中双击 never_lock.vbs 脚本，即可运行。
如需停止脚本，可以按 Ctrl + Shift + Esc 键打开任务管理器，找到 Microsoft ® Windows Based Script Host，结束任务即可。
工作原理
你应该已经猜到，never_lock.vbs 脚本的工作原理就是通过定时按一次 Scroll Lock 键，让系统认为一直有人为操作，只要定时时间在锁屏周期以内，就可以达到避免锁屏的效果。
Scroll Lock 即“滚动锁定键”，是一个现存于大部分键盘上的按键，通常附有一个指示按键开关情况的灯号。这个按键曾经用来锁定所有软件的滚动功能，但已不为现今大部分软件所使用。因为这个按键已经不常用，所以部分键盘（例如笔记本）已经移除了这个键。不过系统还是保留了 Scroll Lock 按键的定义，因此我们可以借助这个没什么用的按键完成防止锁屏的功能，不会对系统造成任何影响。
背景介绍
有些公司出于安全和保密工作考虑，会通过 Windows 组策略强制所有办公电脑在无操作的情况下 5 分钟或者 10 分钟自动锁屏，避免无关人士看到不该看的内容。作为程序员，十分反感这种一刀切的方案，一来很容易打断思路，比如正在写代码或者向别人展示时，突然锁屏了就挺恶心的；二来每次锁屏后都要输入密码，这简直就是浪费生命，不能忍！
为了解决这个问题，我们可以编写一个简单的 vbs 脚本，在锁屏周期内模拟按键操作，从而避免 Windows 桌面被锁屏。之所以使用 vbs 脚本，而不是 Python、JavaScript 等更流行的高级语言，主要是因为这个程序的需求特别简单，而且 vbs 脚本可以在 Windows 系统中直接运行，不需要安装任何依赖。
脚本程序
下面给出两个脚本，你可以将它们命名为 never_lock.vbs 文件（先在 Windows 系统新建一个 txt 文本文件，粘贴代码，然后修改文件名）。
【复杂版本】
Set ws=Wscript.CreateObject("Wscript.Shell")
If ws.expandenvironmentstrings("%strikkeyflag%")=("on")Then
wscript.echo("Screen Never Lockout")
ws.Environment("user").Item("strikkeyflag")="off"
set mi=getobject("winmgmts:win32_process").instances_
for each p in mi
if ucase(p.name)=ucase("wscript.exe")then
p.terminate
End If
Next
wscript.quit
Else
wscript.echo("Screen Never Lockout")
ws.Environment("user").Item("strikkeyflag")="on"
do
set WshShell = CreateObject("WScript.Shell")
WshShell.SendKeys"{ScrollLock}"
wscript.sleep(280000) 'ms
Loop
end if
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
- 18
- 19
- 20
【简单版本】
'先定义一个Shell对象
Set WshShell = WScript.CreateObject("WScript.Shell")
'设置成正需要接续的时间
do
'设置成比屏保时间短点就可以
WScript.Sleep 60000 '1min 60000ms
WshShell.SendKeys "{ScrollLock}"
loop
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
在 Windows 系统中双击 never_lock.vbs 脚本，即可运行。
如需停止脚本，可以按 Ctrl + Shift + Esc 键打开任务管理器，找到 Microsoft ® Windows Based Script Host，结束任务即可。
工作原理
你应该已经猜到，never_lock.vbs 脚本的工作原理就是通过定时按一次 Scroll Lock 键，让系统认为一直有人为操作，只要定时时间在锁屏周期以内，就可以达到避免锁屏的效果。
Scroll Lock 即“滚动锁定键”，是一个现存于大部分键盘上的按键，通常附有一个指示按键开关情况的灯号。这个按键曾经用来锁定所有软件的滚动功能，但已不为现今大部分软件所使用。因为这个按键已经不常用，所以部分键盘（例如笔记本）已经移除了这个键。不过系统还是保留了 Scroll Lock 按键的定义，因此我们可以借助这个没什么用的按键完成防止锁屏的功能，不会对系统造成任何影响。
评论记录：
回复评论：