Petite commande en VBS
Je vais vous expliquer comment faire une commande qui va vous permettre d'ouvrir et de fermer vos lecteur de disque sans que vous n'ayez à toucher leur boutons :
Ouvrez le bloc notes puis entrer ces caractères :
Set owmp = CreateObject("WMPlayer.OCX.7")
Set colCDROMs = owmp.cdromCollection For d = 0 To colCDROMs.Count - 1
colCDROMs.Item(d).Eject
Next
For d = 0 to colCDROMs.Count -1
colCDROMs.Item(d).Eject
Next
Set owmp = Nothing
Set colCDROMs = Nothing
wscript.quit
J'ai créer un petit programme permettant d'ouvrir les lecteurs puis demander la fermeture, ce qui permet de mettre un CD entre temps (pour ceux qui en on marre de se pencher pour ouvrir le lecteur :-P).Je vous le garantit, il ne contient pas de virus !