DVD-rom openen en sluiten

[Remi1995]

Hallo,


(het gaat hier on het VBS dat je in kladblok schrijft, niet om VB)

Ik wil graag 2 programmatjes maken waarmee ik mijn DVD-rom kan openen en sluiten, en dan laten openen als ik een speciale knop op het toetsenbord indruk(van die knoppen als: "Mijn documenten" en "Windows Media Player").
Maar ik weet hoe ik hem kan laten openen (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 ) maar niet hoe ik hem kan laten sluiten.


Kunnen jullie mij een code sturen hoe ik hem kan laten sluiten?

Alvast bedankt.




Vriendlijke groeten: Remi