Bonjour à tous,

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
 
Set objShell = CreateObject("WScript.Shell")
 
' recupere le numéro d'identification du lecteur.
Set objExec = objShell.Exec("mountvol " & lettreSource & ": /L")
idUsb = objExec.StdOut.ReadLine()
 
' démonte le lecteur.
Set objExec = objShell.Exec("mountvol " & lettreSource & ": /D")
 
' remonte le lecteur sur la bonne lettre.
Set objExec = objShell.Exec("mountvol " & lettreCible & ": " & idUsb)
Ce code me permet de changer la lettre des disques amovibles.
Je voudrais savoir s'il est possible de récupérer le numéro d'identification d'un disque amovible ne possédant pas de lettre initiale? Pour au final monter un disque amovible à qui Windows n'a attribué de lettre automatiquement.

Merci pour vos futurs réponses.