[utility] eject cd?
Clicca QUI per vedere il messaggio nel forum |
| cato |
| mi serve una programminio da tenere nella tray bar per aprire il lettore dvd del portatile :) |
| cato |
| trooppo sbatti (c) huston |
| ReQuIeM |
| vabbè, ho postato il link della home page perchè cmq il sito in sè può sempre essere utile! |
| cato |
scherzavo ho gia fatto un giro li e ho scaricato qualcosa da provare,
mi serviva giusto un icona da cliccare ;) |
| Nuntius |
| quale hai scaricato per risolvere la tu aesigenza? |
| fabpicca |
Originally posted by cato
mi serve una programminio da tenere nella tray bar per aprire il lettore dvd del portatile :)
se per windows credo che con uno scriptino VBS te la cavi in poche righe...ad esempio (copio da un forum)
code:
Set oWMP = CreateObject("WMPlayer.OCX.7")
Set colCDROMs = oWMP.cdromCollection
If colCDROMs.Count >= 1 Then
For i = 0 To colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next
End If
'
'The next code opens only the CD-rw:
Set oWMP = CreateObject("WMPlayer.OCX.7")
Set colCDROMs = oWMP.cdromCollection
If colCDROMs.Count >= 1 Then
For i = 0 To colCDROMs.Count - 1
colCDROMs.Item(1).Eject
Next
End If
'
'And this one ONLY the DVD-rw:
Set oWMP = CreateObject("WMPlayer.OCX.7")
Set colCDROMs = oWMP.cdromCollection
If colCDROMs.Count >= 1 Then
For i = 0 To colCDROMs.Count - 1
colCDROMs.Item(2).Eject
Next
End If
mi sono dimenticato la risatina ... eccola... :asd: |
|
|
|
