Gültig für NetWare, Symbian OS, UNIX, Windows und Windows CE.
Die Funktionen "GetFileStoreFree", "GetFileStoreSize" und "GetFileStoreUsage" rufen jeweils die freie, die gesamte und die genutzte Speicherkapazität des Dateisystems in KB ab.
Funktionsformat:
GetFileStoreFree(filename as String) as Integer
GetFileStoreSize(filename as String) as Integer
GetFileStoreUsage(filename as String) as Integer
Gibt einen Datei- bzw. Verzeichnispfad sowie das Dateisystem an. Unter UNIX besitzt das Dateisystem die übliche Bedeutung. In Windows handelt es sich um ein Laufwerk.
Jede der Funktionen gibt die Speicherkapazität in KB zurück.
Beispiel:
In diesem Beispiel werden die Größe sowie der belegte und freie Speicherplatz von Laufwerk C:\ abgerufen.
Dim size, free, used As Integer
Dim TAB As Char
TAB = 0x0009
ClrScr()
size = GetFileStoreSize("c:\")
free = GetFileStoreFree("c:\")
used = GetFileStoreUsage("c:\")
Print("Verfügbarer Speicherplatz auf Laufwerk C:\")
Print("Gesamtgröße" + TAB + TAB + Str(size))
Print("Freier Speicherplatz" + TAB + Str(free))
Print("Belegter Speicherplatz" + TAB + Str(used))
|
Copyright © 2014 CA Technologies.
Alle Rechte vorbehalten.
|
|