Note postée le Mercredi 17 Mai 2006
Le code suivant ouvre le lecteur D:
MCIcommande est une chaîne = ChaîneConstruit("open %1\ type cdaudio alias cdaudio", "D:")
MCIExécute(MCIcommande)
MCIExécute("Set cdaudio door open wait")
Le code suivant ferme le lecteur
MCIcommande est une chaîne = ChaîneConstruit("open %1\ type cdaudio alias cdaudio", "D:")
MCIExécute(MCIcommande)
MCIExécute("Set cdaudio door closed wait")