TotalSize

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

構文

object.TotalSize

パラメータ

object
Drive オブジェクトを指定します。

戻り値

装容量を返します。

説明

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

JScript

1
2
3
4
5
6
7
8
9
10
11
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

1
2
3
4
5
6
7
8
9
10
11
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