Schreibgeschützte Auflistung aller verfügbaren Laufwerke.
|
Syntax | |
|
Drives := TCEWindows.Drives() | |
|
Rückgabewert | |
|
Typ |
Beschreibung |
|
TCEWindows.Drives |
Auflistungsobjekt |
|
Parameter | |
|
Keine | |
Anmerkungen
In Laufwerken mit austauschbaren Medien müssen keine Medien eingelegt sein, damit sie in der Drives-Auflistung angezeigt werden.
Mit Hilfe dieses Beispieles können Sie alle verfügbaren Laufwerke aufzählen:
Dim FSO As New TCEWindows.FileSystem, d As TCEWindows.Drive
For Each d In FSO.Drives
If d.IsReady = True Then
MsgBox "Laufwerk " & d.DriveLetter & " mit verfügbarem Speicher " & d.FreeSpace
End If
EndFor