Computer pranks are some of the most insidious because computer are so expensive, necessary, and misunderstood by the general public. This video will show you how to take advantage of all of that by writing a quick script that will cause a computer's disc drive to open and close apparently of it's own free will. Great for messing with friends and coworkers at the office.
From the Creator:
This is a cool video showing you how to make the CD drive constantly open and close. To make the drive open more frequently reduce the number after the sleep in the script
WARNING!!! youtube does not allow the arrow pointing to the right icon
On this line in the script replace the * with the character above the . button
if colCDROMs.Count *= 1 then
This is the script remember to replace the * with the icon above the . icon
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
1 Comment
I tried this multiple times, and it just gives me an error saying it expected "then" on line 4 char 20. Is it because i'm using windows 8?
thanks!
Share Your Thoughts