7.1 Wie kann ich die Größe einer Datei ermitteln?
VB4-VB6
Von: Tobias Schikora [Home]
Die FileLen- Funktion gibt die Größe einer Datei in Bytes zurück, deren vollständiger Dateiname als Parameter der Funktion übergeben wird:
Dateibytes = FileLen("D:\Wolken.bmp")
Falls die Angabe einer Dateigröße nicht in Bytes erwünscht ist, kann sie selbstverständlich auch umgewandelt werden:
Für die Rückgabe in Kilobytes wird folgender Code verwendet:
Dateibytes = Format$(FileLen("D:\Wolken.bmp") / 1024, "0.00")
Beachten sie bitte, dass hier die Dateigröße auf die zweite Stelle nach dem Komma gerundet wird (der Eigenschaften- Dialog im Windows- Explorer rundet so übrigens auch).
Dateibytes = Format$(FileLen("D:\Wolken.bmp") / 1024 / 1024, "0.00")
würde dann die Größe der Datei "D:\Wolken.bmp" in Megabytes zurückgeben.