Dec 13, 2010

Notepad, System tricks, Tweaks, VISTA tricks, XP tricks

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


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
strQuestion = "Close DRIVE " & strDrive & "?"
answer= msgbox (strQuestion, vbYESNO)
if answer= vbYES then colCDROMs.Item(i).eject:
end if

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.

Labels: , , , , ,


Post a Comment

Subscribe to Post Comments [Atom]

<< Home