@echo off
::打开NumLock指示灯
if exist %SystemRoot%\NumLock.vbs goto vbsok
echo set WshShell = CreateObject("WScript.Shell") >%SystemRoot%\NumLock.vbs
echo WshShell.SendKeys "{NumLock}" >>%SystemRoot%\NumLock.vbs
:vbsok
for /f %%i in ('powershell -command [console]::NumberLock') do if not "%%i"=="True" WScript.exe /b %SystemRoot%\NumLock.vbs



 



@echo off
::关闭NumLock指示灯
if exist %SystemRoot%\NumLock.vbs goto vbsok
echo set WshShell = CreateObject("WScript.Shell") >%SystemRoot%\NumLock.vbs
echo WshShell.SendKeys "{NumLock}" >>%SystemRoot%\NumLock.vbs
:vbsok
for /f %%i in ('powershell -command [console]::NumberLock') do if "%%i"=="True" WScript.exe /b %SystemRoot%\NumLock.vbs




还可以叫一个判断 是否为笔记本或平板 如果是笔记本、平板、手持设备 就不开小键盘：



echo 自动开启数字小键盘
for /f "delims=" %%i in ('powershell -Command "Get-WmiObject -Class Win32_SystemEnclosure -Namespace 'root\CIMV2' | Select-Object -ExpandProperty ChassisTypes"') do set "ChassisTypes=%%i">nul
if "%ChassisTypes%"=="1"  goto tuichu
if "%ChassisTypes%"=="2"  goto tuichu
if "%ChassisTypes%"=="9"  goto tuichu
if "%ChassisTypes%"=="10"  goto tuichu
if "%ChassisTypes%"=="11"  goto tuichu
if "%ChassisTypes%"=="14"  goto tuichu
if "%ChassisTypes%"=="30"  goto tuichu
echo set WshShell = CreateObject("WScript.Shell") >%windir%\Temp\NumLock.vbs
echo WshShell.SendKeys "{NumLock}" >>%windir%\Temp\NumLock.vbs
for /f %%i in ('powershell -command [console]::NumberLock') do if not "%%i"=="True" WScript.exe /b %windir%\Temp\NumLock.vbs>nul
del /f /q %windir%\Temp\NumLock.vbs
:tuichu