[RESOLU] scruter mes disques tantque ...
Posté par Chapeau_m le 3/11/2007 14:20:25
Hello,
comment pourrais-je écrire une procédure qui
- scrute tout mes disques du type 1 (amovible)
- si un amovible est trouvé, vérifier s'il porte le nom "x"
- une fois que ces deux condition son ok : récuperer la lettre
de ce disque en question.
Ceci sans utiliser la fonction USBDétecteStockageAmovible
BAV et a+
-------------
Entre temps j'ai trouvé sur ce forum même et je l'ai adapté :
comment pourrais-je écrire une procédure qui
- scrute tout mes disques du type 1 (amovible)
- si un amovible est trouvé, vérifier s'il porte le nom "x"
- une fois que ces deux condition son ok : récuperer la lettre
de ce disque en question.
Ceci sans utiliser la fonction USBDétecteStockageAmovible
BAV et a+
-------------
Entre temps j'ai trouvé sur ce forum même et je l'ai adapté :
PROCEDURE scrutusb()
letter est un entier
drive est une chaîne
//---On balaye toute les lettre de lecteur possible (De a: à z:)
POUR letter = 65 A 90
drive = Caract(letter)+":"
SI fDisqueInfo(drive,fdTypeDisque) = fdAmovible ALORS
//---Il y a un disque amovible de branché
SI fDisqueInfo(drive,fdNomVolume) = "MERLIN" ALORS
Info("MERLIN est connecté sur "+drive)
drive = Lettredudisque
SINON Info ("Ce stick USB n'est pas le MERLIN")
FIN
FIN
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=18&topic_id=5484&post_id=22540