|
Returns the amount of free space available to a user on the specified drive or network share. This property is not currently supported on UNIX. Read-only.
object.FreeSpace
object
A Drive object.
The value returned by the FreeSpace property is typically the same as that returned by the Drive Object AvailableSpace Property. Differences may occur between the two for computer systems that support quotas.
The following code illustrates the use of the FreeSpace property:
Sub ShowFreeSpace(drvPath)
Dim fs, d, s
Set fs = CreateObject("Scripting.FileSystemObject")
Set d = fs.GetDrive(fs.GetDriveName(drvPath))
s = "Drive " & UCase(drvPath) & " - "
s = s & d.VolumeName & vbCrLf
s = s & "Free Space: " & FormatNumber(d.FreeSpace/1024, 0)
s = s & " Kbytes"
Response.Write s
End Sub
Copyright 2002 Sun Microsystems, Inc. All rights reserved. Legal Notice.