Keyboard එකේ Disco නටමුද?

ඔන්න අද සෙට් ඒකට දෙන්න යන්නෙ පොඩි ආතල් වැඩක්. (ටිකක් පරණයි.) මෙන්න මේක Notepad ඒකකට copy කරල .vbs ඒකක් විධිහට Save කරන්නකෝ. දැන් Execute කරන්න.




Set wshShell =wscript.CreateObject("WScript​.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{CAPSLOCK}"
wshshell.sendkeys "{NUMLOCK}"
wshshell.sendkeys "{SCROLLLOCK}"
loop