TotalSize プロパティ

ドライブまたはネットワーク共有の総容量をバイト単位で返します。

object.TotalSize 

object には、Drive オブジェクトの名前を指定します。

解説

次のコードは、TotalSize プロパティの使用例です。

function SpaceReport(drvPath)
{
   var fso, d, s;
   fso = new ActiveXObject("Scripting.FileSystemObject");
   d = fso.GetDrive(fso.GetDriveName(drvPath));
   s = "ドライブ " + drvPath + " - ";
   s += d.VolumeName + "<BR>";
   s += "合計サイズ :"+ d.TotalSize/1024 + " KB <BR>";
   s += "空き領域:   " + d.FreeSpace/1024 + " KB";
   return(s);
}
[VBScript]
Function ShowSpaceInfo(drvpath)
   Dim fso, d, s
   Set fso = CreateObject("Scripting.FileSystemObject")
   Set d = fso.GetDrive(fso.GetDriveName(fso.GetAbsolutePathName(drvpath)))
   s = "ドライブ " & d.DriveLetter & ":"
   s = s & vbCrLf
   s = s & "合計サイズ : " & FormatNumber(d.TotalSize/1024, 0) & " KB"
   s = s & vbCrLf
   s = s & "空き領域 : " & FormatNumber(d.AvailableSpace/1024, 0) & " KB"
   ShowSpaceInfo = s
End Function

参照

AvailableSpace プロパティ | DriveLetter プロパティ | DriveType プロパティ | FileSystem プロパティ | FreeSpace プロパティ | IsReady プロパティ | Path プロパティ | RootFolder プロパティ | SerialNumber プロパティ | ShareName プロパティ | VolumeName プロパティ

対象: Drive オブジェクト