create shortcut from DVD drive in device manager

A

alice

I'm finding that the only way to get my DVD drive to eject is to use
the device manager to diseable and then re-enable it.
This leads me to wanting an icon to do this with on my desktop. Is I
can create a desktop icon from the DVD drive from file explorer, but
that one does not allow right click-disable/enable. Is there any way
to create a short cut from the device manager DVD icon?
 
W

Wesley Vogel

Try this...

Open My Computer | Right click your drive | Click Eject.

Then try this...

Straighten a paper clip, push the straight end into
the little (I mean small) hole on the front of the CD drive, there
will be a bit of resistance. Keep your hand out of the way. You
might consider doing this one with the computer turned OFF.

If you have a 3rd party CD burning program running, something like InCD or
similar, that program may take over the Eject function.

If that is the case, stop the program. Or right click that program's
notification icon (by your clock) and select Eject from that program's menu.

To eject a CD using Windows Media Player...
1. On the Play menu, click Eject.
2. If you have more than one CD-ROM drive, on the Play menu, point to Eject
and then click the drive from which you want to eject the CD.

Note
You can also use the Eject command to open and close your CD-ROM tray.
Click Eject once to open the tray and then click Eject again to close it.

Eject CD or DVD drives

These two .vbs files will open the trays on D: and E: drives.

Copy the lines below into Notepad, not including the ---- parts.

Save as ejectD.vbs

-----------below this line----------------
Set objShell = CreateObject("Shell.Application")
Set MyComp=objShell.NameSpace(17)
Set CD=MyComp.ParseName("D:\")
Set Context=CD.Verbs
CD.InvokeVerb "E&ject"
-----------above this line----------------

Copy the lines below into Notepad, not including the ---- parts.

Save as ejectE.vbs

-----------below this line----------------
Set objShell = CreateObject("Shell.Application")
Set MyComp=objShell.NameSpace(17)
Set CD=MyComp.ParseName("E:\")
Set Context=CD.Verbs
CD.InvokeVerb "E&ject"
-----------above this line----------------

There is one difference in the two, ("D:\") and ("E:\") are the drive
letters. These can be changed to any CD or DVD drive letter.

You can move the .vbs files where ever you want.

You can also create shortcuts to both .vbs files.

Then just double click ejectD.vbs or ejectE.vbs to eject the drive. Or just
double click the shortcut to ejectD.vbs or ejectE.vbs to eject the drive.

--
Hope this helps. Let us know.

Wes
MS-MVP Windows Shell/User

In
 
A

alice

Try this...

Open My Computer | Right click your drive | Click Eject.

Then try this...

Straighten a paper clip, push the straight end into
the little (I mean small) hole on the front of the CD drive, there
will be a bit of resistance. Keep your hand out of the way. You
might consider doing this one with the computer turned OFF.

If you have a 3rd party CD burning program running, something like InCD or
similar, that program may take over the Eject function.

If that is the case, stop the program. Or right click that program's
notification icon (by your clock) and select Eject from that program's menu.

To eject a CD using Windows Media Player...
1. On the Play menu, click Eject.
2. If you have more than one CD-ROM drive, on the Play menu, point to Eject
and then click the drive from which you want to eject the CD.

Note
You can also use the Eject command to open and close your CD-ROM tray.
Click Eject once to open the tray and then click Eject again to close it.

Eject CD or DVD drives

These two .vbs files will open the trays on D: and E: drives.

Copy the lines below into Notepad, not including the ---- parts.

Save as ejectD.vbs

-----------below this line----------------
Set objShell = CreateObject("Shell.Application")
Set MyComp=objShell.NameSpace(17)
Set CD=MyComp.ParseName("D:\")
Set Context=CD.Verbs
CD.InvokeVerb "E&ject"
-----------above this line----------------

Copy the lines below into Notepad, not including the ---- parts.

Save as ejectE.vbs

-----------below this line----------------
Set objShell = CreateObject("Shell.Application")
Set MyComp=objShell.NameSpace(17)
Set CD=MyComp.ParseName("E:\")
Set Context=CD.Verbs
CD.InvokeVerb "E&ject"
-----------above this line----------------

There is one difference in the two, ("D:\") and ("E:\") are the drive
letters. These can be changed to any CD or DVD drive letter.

You can move the .vbs files where ever you want.

You can also create shortcuts to both .vbs files.

Then just double click ejectD.vbs or ejectE.vbs to eject the drive. Or just
double click the shortcut to ejectD.vbs or ejectE.vbs to eject the drive.

--
Hope this helps. Let us know.

Wes
MS-MVP Windows Shell/User

Inalice <[email protected]> hunted and pecked:




- Show quoted text -

I've tried all these things many times, including replacing the DVD
drive 3 times now. I know that it will never be fixed, so I just want
to make it easier to disable and re-enable again. That is the only way
it will work on my system. I have had well-paid (not by me)
professional PC techs look into the issue and they cannot fix it.
 
G

Guest

A shortcut with the command :

devmgmt.msc

will open device manager.

There are scripting commands to wait till it opens, then send keystrokes to
the focus, like tab, down, down, and so on. This would require leaving the
keyboard alone while it ran, and making sure nothing else was going to grab
the focus.

You would need the exact series of key presses. For example, the Properties
of any item is called with the keyboard combo: Alt-Enter, and the drop box
for 'enable' would be Alt-D, then DOWN, the Enter.
 
A

alice

A shortcut with the command :

devmgmt.msc

will open device manager.

There are scripting commands to wait till it opens, then send keystrokes to
the focus, like tab, down, down, and so on. This would require leaving the
keyboard alone while it ran, and making sure nothing else was going to grab
the focus.

You would need the exact series of key presses. For example, the Properties
of any item is called with the keyboard combo: Alt-Enter, and the drop box
for 'enable' would be Alt-D, then DOWN, the Enter.
--
Was this post helpful to you? Voting helps others who use the web interface.
Mark L. Ferguson






- Show quoted text -

Thanks, that woks a bit better.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top