Schreibgeschützte Auflistung aller verfügbaren Laufwerke.
Anmerkungen
In Laufwerken mit austauschbaren Medien müssen keine Medien eingelegt sein, damit sie in der Drives-Auflistung angezeigt werden.
Dieses Beispiel zeigt, wie alle verfügbaren Drive-Objekte über eine FOR EACH-Schleife angesprochen werden:
Dim FSO As New TCEWindows.FileSystem, d As TCEWindows.Drive
For Each d In FSO.Drives
If d.IsReady = True Then
MsgBox "LW " & d.DriveLetter & " mit verf. Speicher " & d.FreeSpace
End If
EndFor