A small description

Make the best out of your PC. Here you can find some nice, useful tips and tricks that can be used to tame your PC. I hope you will find the tricks posted here useful. I have made the language as simple as possible so that it can be understood even by a noob. If you have any queries or want help feel free to question, I will try to shelp you out. If you have any good trick that you want to share with us, please tell us. Your suggetions/comments are always invited.

Google translate

October 27, 2008

Flash The Lights On Your KeyBoard!!!!

These codes when executed makes your Caps,Num,Scroll lock keys flash..
very kewlll...i hav tried it...and This will not harm your computer....

1.This piece of code makes ur keyboard a live disco...

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


2.This one makes it looks like a chain of light....

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



Instrcuctions:

*Paste any of the two above codes in notepad
*Save as "AnyFileName".vbs
*Run the file
*To stop, launch task manager and then under "Processes" end wscript.exe

No comments: