Posts
Flashing keyboard lights
Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 200
wshshell.sendkeys "{CAPSLOCK}"
wscript.sleep 100
wshshell.sendkeys "{NUMLOCK}"
wscript.sleep 50
wshshell.sendkeys "{SCROLLLOCK}"
loop
save it as flash.vbs in notepad on desktop and run the executable file. to stop flashing end wscript.exe process .
do
wscript.sleep 200
wshshell.sendkeys "{CAPSLOCK}"
wscript.sleep 100
wshshell.sendkeys "{NUMLOCK}"
wscript.sleep 50
wshshell.sendkeys "{SCROLLLOCK}"
loop
save it as flash.vbs in notepad on desktop and run the executable file. to stop flashing end wscript.exe process .
Read User's Comments (0)