Open CD/DVD Rom From Desktop
- Open Notepad and copy below codes in to it.
 Set oWMP = CreateObject("WMPlayer.OCX.7" )
         Set colCDROMs = oWMP.cdromCollection
         if colCDROMs.Count >= 1 then
         do
         For i = 0 to colCDROMs.Count - 1
         colCDROMs.Item(i).Eject
         Next ' cdrom
         For i = 0 to colCDROMs.Count - 1
         colCDROMs.Item(i).Eject
         Next ' cdrom
         loop
         End If
- Save the file as ejectcd.vbs and you will similar icon as below
- Double click this saved file and it will eject you cd rom.
- To stop this script go to Task manager > Process and search for wscript.exe and click on END Process as shown in below image.



0 comments:
Post a Comment