IsReady プロパティ
指定されたドライブの準備ができている場合は真 (true) を返します。準備ができてない場合は偽 (false) を返します。
object.IsReady
object には、Drive オブジェクトの名前を指定します。
解説
リムーバブル ディスク ドライブおよび CD-ROM ドライブの場合は、ドライブにメディアがセットされており、アクセスできる状態にある場合にだけ真 (true) になります。
次のコードは、IsReady プロパティの使用例です。
function ShowDriveInfo(drvpath)
{
var fso, d, s, t;
fso = new ActiveXObject("Scripting.FileSystemObject")
d = fso.GetDrive(drvpath)
switch (d.DriveType)
{
case 0:t = "不明"; break;
case 1:t = "リムーバブル ディスク"; break;
case 2:t = "ハード ディスク"; break;
case 3:t = "ネットワーク ドライブ"; break;
case 4:t = "CD-ROM"; break;
case 5:t = "RAM ディスク"; break;
}
s = "ドライブ " + d.DriveLetter + ": - " + t;
if (d.IsReady)
s += "<BR>" + "ドライブの準備ができています。";
else
s += "<BR>" + "ドライブの準備ができていません。";
return(s);
}
[VBScript]
Function ShowDriveInfo(drvpath)
Dim fso, d, s, t
Set fso = CreateObject("Scripting.FileSystemObject")
Set d = fso.GetDrive(drvpath)
Select Case d.DriveType
Case 0: t = "不明"
Case 1: t = "リムーバブル ディスク"
Case 2: t = "ハード ディスク"
Case 3: t = "ネットワーク ドライブ"
Case 4: t = "CD-ROM"
Case 5: t = "RAM ディスク"
End Select
s = "Drive " & d.DriveLetter & ": - " & t
If d.IsReady Then
s = s & "<BR>" & "ドライブの準備ができています。"
Else
s = s & "<BR>" & "ドライブの準備ができていません。"
End If
ShowDriveInfo = s
End Function
参照
AvailableSpace プロパティ | DriveLetter プロパティ | DriveType プロパティ | FileSystem プロパティ | FreeSpace プロパティ | Path プロパティ | RootFolder プロパティ | SerialNumber プロパティ | ShareName プロパティ | TotalSize プロパティ | VolumeName プロパティ
対象: Drive オブジェクト