[решено] Как проверить состояние Caps Lock и Num Lock?

[Solitude]

Как проверить состояние клавиш Caps Lock и Num Lock ? Если они нажаты, запустить определенный cmd файл ?
Если есть возможность, покажите пример.

[amel27]

любым скриптовым языком, поддерживающим API вызовы, пример на AutoIT:
$sCMDPath = 'C:\Script.CMD' ; Путь к CMD-файлу
$sCMDRoot = 'C:\' ; Каталог запуска

Const $iCapsLock = 0x14 ; скан-код CAPS LOCK
Const $iNumLock = 0x90 ; скан-код NUM LOCK

; Определяем состояние нужной клавиши
$aRet = DllCall("user32.dll", "int", "GetKeyState", "int", $iCapsLock)
; Если включена или нажата запуск скрипта
If $aRet[0] Then
Run(@ComSpec & " /C " & $sCMDPath, $sCMDRoot, @SW_HIDE)
EndIf