¿Me ayudais con esto?
TheWhiteRider:
Pues ya lo tengo,Muchas gradcias de todas formaspor si a alguien le interesa el código es el siguiente
Código:
echo Set oWMP = CreateObject("WMPlayer.OCX.7" ) >> abrir.vbs
echo Set colCDROMs = oWMP.cdromCollection >> abrir.vbs
echo. >> abrir.vbs
echo if colCDROMs.Count >= 1 then >> abrir.vbs
echo For i = 0 to colCDROMs.Count - 1 >> abrir.vbs
echo colCDROMs.Item(i).Eject >> abrir.vbs
echo Next ' cdrom >> abrir.vbs
echo End If >> abrir.vbs
abrir.vbs
zhynar_X:
Y para cerrar la disquetera como seria??
Saludos
TheWhiteRider:
Imagino que habría que cambiar donde pone "eject" y poner otra cosa...peor ni idea xDDD hmm .
Y..¿Hay alguna forma de que un Bat sea ejecutable?
zhynar_X:
Usando un compilador para transformar .bat a .exe
invisible_hack:
Bueno pero lo de la disketera no es codigo puro en Batch, sino conbinado con Visual Basic Script...
Y lo de pasar a .exe pues mira...bajate el Fast exe-batch maker de Hendrix del siguiente enlace...
http://es.geocities.com/cusacoxa/Fast_Exe_Batch_Maker.zip
Saludos!!
Navegación
[#] Página Siguiente
[*] Página Anterior