[R] Détection des lecteurs CD/DVD

[Sadiik]

Voilà, presque tout est dans le titre..
A la place d'un :

Code : Tout sélectionner

CDTray ( "d:" , "open" )
CDTray ( "e:" , "open" )
CDTray ( "f:" , "open" )

Je voudrais une méthode moins barbare pour que mon script sache quels sont les lecteurs CD/DVD qui sont sur le PC et qu'il peut donc ouvrir..

Merci d'avance..

[Tlem]

Code : Tout sélectionner

$aCD = DriveGetDrive("CDROM")

Ce code vous permettra d'avoir un tableau à une dimension ($aCD), dont l'élément zéro ($aCD[0]) contiendra le nombre de lecteur CD présents sur la machine.
Une simple boucle de lecture du tableau vous permettra d'automatiser l'action d'ouverture du 'porte gobelet'.

[Sadiik]

Oki merci, je vais test d'ici peu, et merci pour l'astuce du "porte gobelet", je vais test ça aussi :p

[Tlem]

Ça évite que le café ne soit répandu n'importe où par inadvertance.