Renvoie une collection Drives constituée de tous les objets Drive disponibles sur la machine locale.
object.Drives
L'argument object représente toujours un objet FileSystemObject.
Les lecteurs de supports amovibles apparaissent dans la collection Drives même lorsqu'ils sont vides.
Vous pouvez parcourir les membres de la collection Drives en utilisant une structure For Each...Next comme illustré dans le code suivant :
Function ShowDriveList
Dim fso, d, dc, s, n
Set fso = CreateObject("Scripting.FileSystemObject")
Set dc = fso.Drives
For Each d in dc
n = ""
s = s & d.DriveLetter & " - "
If d.DriveType = 3 Then
n = d.ShareName
ElseIf d.IsReady Then
n = d.VolumeName
End If
s = s & n & "<BR>"
Next
ShowDriveList = s
End Function
Drives, collection | Files, propriété | SubFolders, propriété
Application: FileSystemObject, objet