[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[问题求助] vbs能否判断CapsLock/NumLock按键的状态(关闭/禁用、开启/启用)

本帖最后由 pcl_test 于 2019-3-6 13:41 编辑

vbs能否判断numlock按键的状态,若是关闭/禁用则开启/启用

判断numlock按键灯,若是关闭,就发送代码“NUMLOCK”,谢谢


下面的vbs代码,无论灯是否关闭,都会强制发送。
  1. set WshShell=CreateObject("Wscript.shell")
  2. WshShell.SendKeys"{NUMLOCK}"
复制代码
———————————更新下。
虚拟机是win7系统,装收费软件客户端。。
win7系统启动到桌面以前,首先要输入帐号密码,登录收费软件客户端。
输入帐号密码的界面,numlock指示灯默认是关闭的。有点烦人。

不知道在开始-程序-启动菜单里面,加上个bat或者vbs代码,如果检测到numlock灯关闭就给打开。是否能解决这种问题呢?

本帖最后由 ygqiang 于 2017-4-12 11:42 编辑

回复 5# pcl_test


    多谢。win7 64系统测试可用。

如果检测到numlock按键灯是关闭的,如何打开呢?
(vbs运行过程中不需要弹出任何窗口,静默打开就行)

1楼更新了具体使用场景。

TOP

回复 7# yu2n


保存为js文件。双击, xp系统测试不通过。
行53  字符2  错误‘null’为空或不是对象

TOP

回复 2# 老刘1号


    需要netframe4.0环境支持。测试不通过。

TOP

回复 11# yu2n


win7 系统测试通过。    xp系统测试不行。
提示NumLock.exe 应用程序错误  正常初始化失败

TOP

本帖最后由 ygqiang 于 2017-4-13 10:47 编辑

回复 5# pcl_test


    你好,你的代码,能否跟1楼代码。合并下。
实现

1、你的vbs代码判断灯如果没有打开,就运行1楼这个vbs代码。如果灯打开了,就直接退出
2、你的vbs代码,不需要弹出任何提示窗口,后台静默执行。

TOP

本帖最后由 ygqiang 于 2017-4-13 19:53 编辑

回复 15# yu2n


    ghost tudou  xpsp3版本。

xp系统暂时不考虑了。简单修改注册表就能实现。xp默认一直开启numlock灯。
  1. ;14寸及以下笔记本勿改,否则开启数字键盘后字母变数字的。
  2. ;一般台机或者大尺寸笔记本都有数字键,在键盘右侧,方便直接输入数字
  3. cls
  4. reg add "HKEY_CURRENT_USER\Control Panel\Keyboard" /f /v "InitialKeyboardIndicators" /t REG_SZ /d 2
  5. reg add "HKEY_USERS\.DEFAULT\Control Panel\Keyboard" /f /v "InitialKeyboardIndicators" /t REG_SZ /d 2
  6. 1pause
  7. shutdown.exe -r -t 1
  8. 1pause
  9. shutdown.exe -r -f
  10. exit
复制代码

TOP

返回列表