Open CDROM with 1 click - Cool Computer Trick

Add This To Del.icio.us Share on Facebook StumbleUpon This Add to Technorati Digg This

Here is trick to open cdrom in 1 click. For this you have to make a file which when clicked open cdrom. So to make that file follow given steps:

1). Open notepad.

2). Copy given code as it is into it

code:

Set oWMP = CreateObject("WMPlayer.OCX.7")

Set colCDROMs = oWMP.cdromCollection

if colCDROMs.Count >= 1 then

for i=0 to colCDROMs.Count - 1

strDrive= oWMP.cdromCollection.item(i).driveSpecifier

colCDROMs.Item(i).Eject

strQuestion = "Close DRIVE " & strDrive & "?"

answer= msgbox (strQuestion, vbYESNO)

if answer= vbYES then colCDROMs.Item(i).eject:

next

end if

wscript.quit

3). Save it anywhere with the name cdrom.vbs.

Its done.

The above file when clicked will open your cd rom and ask question to close it and will close in case of pcs when you say yes.

For Further Reading,

Fun Tricks, PC Tricks, Simple Hacks