Pfad, freier Speicherplatz ermitteln

[yes2002]

Hi,

ich kenne keinen Pfadnamen, z.B. f:\test\.

Wie kriege ich heraus, wieviel Speicherplatz verfügbar ist.

Auf Kommandozeilenebene kann ich das ja z.B. mit dem Befehl DIR ermitteln. Hat jemand ein Tipp?

Ich möchte das in Lotusscript einbauen.

[Till_21]

mit noteseigenen bordmitteln so nicht realisierbar...
aber...
es gibt ja noch die winapi:

DECLARATIONTS->

Declare Function GetDiskFreeSpaceEx Lib "kernel32" _
Alias "GetDiskFreeSpaceExA" _
(Byval lpDirectoryName As String, _
lpFreeBytesAvailableToCaller As Currency, _
lpTotalNumberOfBytes As Currency, _
lpTotalNumberOfFreeBytes As Currency) As Long
' Dimension Constant values.
Const GigaByte = 1073741824
Const MegaByte  = 1048576


FUNCTION->

Function Getsize(volume As String) As Currency
   Dim cJunkValue As Currency
   Dim cTotalNumberOfBytesOnDrive As Currency
   Dim cTotalNumberOfFreeBytes As Currency
   
   Dim lResults As Long
   lResults = GetDiskFreeSpaceEx(volume, cJunkValue, cTotalNumberOfBytesOnDrive, cTotalNumberOfFreeBytes)
   
   ' cTotalNumberOfBytesOnDrive
   Getsize = cTotalNumberOfFreeBytes
End Function

AUFRUF ->

diskfree = Cdbl(Getsize("C:\"))*10000



gruss

[yes2002]

Hi,

erstmal Danke für die Mühe, nützt mir leider nichts. Das Script gibt mir den gesamten freien Platz auf der Festplatte aus. Ich arbeite mit Netzlaufwerken (Novell) und wollte da wissen, wieviel Platz noch auf diesem Pfad (?) frei ist. Die richtige Info bekomme ich mit dir *.* /s.

Hast Du noch eine Idee?

Danke und Gruß