Here is a "KeyLed DLL" that allows control keyboard LEDs without emulating key press.
http://www.boris-toll.at/load/software.php
And this is vbs example that came with the dll package:
code:
'----------------------------------------------- Script by Boris Toll / 2005
Option Explicit
Dim KeyLeds, Counter
Set KeyLeds = CreateObject("Key.Leds")
Do Until Counter = 10
if KeyLeds.LedStatus("NUMLED") = 0 then
KeyLeds.LedOn("NUMLED")
else
KeyLeds.LedOff("NUMLED")
end if
if KeyLeds.LedStatus("CAPSLED") = 0 then
KeyLeds.LedOn("CAPSLED")
else
KeyLeds.LedOff("CAPSLED")
end if
if KeyLeds.LedStatus("SCROLLLED") = 0 then
KeyLeds.LedOn("SCROLLLED")
else
KeyLeds.LedOff("SCROLLLED")
end if
wscript.sleep 500
Counter = Counter + 1
Loop
If someone could help adopt it to MPL, it would be awsome!
Anyone?
Thank you.