TotalSize Property 

Returns the total space, in bytes, of a drive or network share.


object.TotalSize 

Remarks

The object is always a Drive object.

The following code illustrates the use of the TotalSize property:

function SpaceReport(drvPath)

{

   var fso, d, s;

   fso = new ActiveXObject("Scripting.FileSystemObject");

   d = fso.GetDrive(fso.GetDriveName(drvPath));

   s = "Drive " + drvPath + " - ";

   s += d.VolumeName + "<br>";

   s += "Total Space: "+ d.TotalSize/1024 + " Kbytes <br>";

   s += "Free Space:   " + d.FreeSpace/1024 + " Kbytes";

   return(s);

}
Function ShowSpaceInfo(drvpath)

   Dim fso, d, s

   Set fso = CreateObject("Scripting.FileSystemObject")

   Set d = fso.GetDrive(fso.GetDriveName(fso.GetAbsolutePathName(drvpath)))

   s = "Drive " & d.DriveLetter & ":"

   s = s & vbCrLf

   s = s & "Total Size: " & FormatNumber(d.TotalSize/1024, 0) & " Kbytes"

   s = s & vbCrLf

   s = s & "Available: " & FormatNumber(d.AvailableSpace/1024, 0) & " Kbytes"

   ShowSpaceInfo = s

End Function

Applies To:

Drive Object

See Also

Reference

AvailableSpace Property
DriveLetter Property
DriveType Property
FileSystem Property
FreeSpace Property
IsReady Property
Path Property (FileSystemObject)
RootFolder Property
SerialNumber Property
ShareName Property
VolumeName Property