GetDrive

(PWS4 IIS4 IIS5)
GetDrive — 指定されたパスに含まれるドライブに対応する Drive オブジェクトを返します。

構文

object.GetDrive ( drivespec )

パラメータ

object
FileSystemObject オブジェクトを指定します。
drivespec
パス名。
「c:」か「\\」から始まる文字列で指定します。

戻り値

ドライブオブジェクトを返します。

説明

ネットワーク共有名を指定した場合は、その共有が存在するかどうかが確認されます。

引数 drivespec が指定可能な形式になっていない場合、および指定したドライブが存在しない場合は、エラーが発生します。

例

JScript

1
2
3
4
5
6
7
8
9
10
function ShowFreeSpace(drvPath)
{
   var fso, d, s ="";
   fso = new ActiveXObject("Scripting.FileSystemObject");
   d = fso.GetDrive(fso.GetDriveName(drvPath));
   s = "ドライブ " + drvPath.toUpperCase( ) + " - ";
   s += d.VolumeName + ">BR<";
   s += "空き領域:" + d.FreeSpace/1024 + " KB";
   return(s);
}

VBScript

1
2
3
4
5
6
7
8
9
10
Function ShowFreeSpace(drvPath)
   Dim fso, d, s
   Set fso = CreateObject("Scripting.FileSystemObject")
   Set d = fso.GetDrive(fso.GetDriveName(drvPath))
   s = "ドライブ " & UCase(drvPath) & " - "
   s = s & d.VolumeName   & ">BR<"
   s = s & "空き領域: " & FormatNumber(d.FreeSpace/1024, 0)
   s = s & " KB"
   ShowFreeSpace = s
End Function