Consulta también:
- La unidad de dvd no abre
- Windows usb/dvd download tool - Programas - Almacenamiento
- No abre hotmail - Guide
- Porque mi smart tv no abre páginas de internet - Foro Hardware
- Copiar dvd a dvd ✓ - Foro Software
- Copiar un dvd a otro dvd en nero startsmart ? - Foro Software
3 respuestas
Fuchonto
Mensajes enviados
23
Fecha de inscripción
viernes, 2 de enero de 2009
Estatus
Miembro
Última intervención
jueves, 28 de mayo de 2009
20
22 may 2009 a las 14:34
22 may 2009 a las 14:34
Tenes que meter un alfiler o algo parecido en el agujerito que tiene en la tapa de la lectora
Intenta probando este código que me encontré por internet.
Set oWMP = CreateObject("WMPlayer.OCX.7" )
Set colCDROMs = oWMP.cdromCollection
if colCDROMs.Count then
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next ' cdrom
End If
Lo guardas en el block de notas con el nombre que quieras (yo le puse abrir unidad de cd) lo importante es que lo guardes con la extensión .vbs
luego le das doble click y se abrirá la unidad de DVD
Espero que te sirva porque yo también tenía el mismo problema
Set oWMP = CreateObject("WMPlayer.OCX.7" )
Set colCDROMs = oWMP.cdromCollection
if colCDROMs.Count then
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next ' cdrom
End If
Lo guardas en el block de notas con el nombre que quieras (yo le puse abrir unidad de cd) lo importante es que lo guardes con la extensión .vbs
luego le das doble click y se abrirá la unidad de DVD
Espero que te sirva porque yo también tenía el mismo problema