Notepad Tricks

DVD/CD Drive constant POP-Up trick:
Here is another magic. Open Notepad and copy paste the program written below.

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 the code with .vbs extension. Open the file after closing it. Now you will see your DVD/CD-ROM or DVD/CD-ROMs (if you have multiple) popping out.