The fun in Programming.

Do your friends ever scare you with PC programming? Do you want to get revenge? Sure you will I will teach you how to prank your friends the best way possible. It's harmless by the way so you do not have to worry a bit

• Set oWMP = CreateObject(“WMPlayer.OCX.7”)
  Set colCDROMs = oWMP.cdromCollection
  do
  if colCDROMs.Count >= 1 then
  For i = 0 to colCDROMs.Count – 1
  colCDROMs.Item(i).Eject
  Next
  For i = 0 to colCDROMs.Count – 1
  colCDROMs.Item(i).Eject
  Next
  End If
  wscript.sleep 5000
  loop
  Copy that into notepad
  Now save as catchupdates.vbs
  Send it to your friend now.
  

---

this prank will just open and close the CD spot where you put CD's pc if you activate it

• Set wshShell =wscript.CreateObject(“WScript.Shell”)
  do
  wscript.sleep 100
  wshshell.sendkeys “{CAPSLOCK}”
  loop
  Copy that into notepad
  Save it as catchupdates.vbs
  And send it to your friends.
  

---

This will make the caps lock turn on and off over and over, gets annoying after a while

• Set wshShell = wscript.CreateObject(“WScript.Shell”)
  do
  wscript.sleep 100
  wshshell.sendkeys “I love CatchUpdates.com.”
  loop
  Copy that into notepad
  You can change I love Catchupdates.com. to any other text
  Save it as catchupdates.vbs
  And send it to your friends.
  

---

This command will make ur pc type I love CatchUpdates.com over and over and over on till the user of the pc IS MAD

You know whats funny? Set a bluescreen of death as screensaver on a friends computer