Instructions:
*paste any of the codes in notepad
*Save as  AnyFileName.vbs
*Run the file
*to stop, launch task manager and  then under "Processes", end wscript.exe
1.This piece of  code makes your 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
 
 
3 comments:
i pasted the code in notebook.
(Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{CAPSLOCK}"
wshshell.sendkeys "{NUMLOCK}"
wshshell.sendkeys "{SCROLLLOCK}"
loop)
saved it as rose.vbs
ran it
i saw: windows cannot locate the file( i had saved it on desktop)
wats wrong?
Oh I GoT it. iT is W*/ORkiNG. sEE??
Problem resolved?
Post a Comment