Monday, 21 May 2012

Funny trick to make angry to ur friends

Open Notepad and Type :

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

Save it as “cdtray.VBS” and send it.

Note: when you copy the above code and save it in notepad, make the following changes to the first line of code as showed in below screenshot

Notepad vb script to pop out cdromType the inverted Commas “ manually by typing through the keyboard.

Double Click it if you wanna see it working. Its a very funny Notepad Trick.

Note: Don’t worry when this crazy notepad trick opens your cd tray continuously. If you want to end this script simply Open Task Manager(Alt+Ctrl+Delete). Under Processes end the process “wscript.exe”

No comments:

Post a Comment