欧美bbbwbbbw肥妇,免费乱码人妻系列日韩,一级黄片


IsReady 屬性

如果指定的驅(qū)動(dòng)器就緒,返回 True;否則返回 False。

object.IsReady

object 應(yīng)為 Drive 對(duì)象的名稱。

說(shuō)明

對(duì)于可移動(dòng)媒體驅(qū)動(dòng)器和 CD-ROM 驅(qū)動(dòng)器,僅當(dāng)插入相應(yīng)的媒體并準(zhǔn)備接受訪問(wèn)時(shí),IsReady 返回 True

以下代碼舉例說(shuō)明如何使用 IsReady 屬性:

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 = "可移動(dòng)"
        Case 2: t = "固定"
        Case 3: t = "網(wǎng)絡(luò)"
        Case 4: t = "CD-ROM"
        Case 5: t = "RAM 磁盤(pán)"
    End Select
    s = "驅(qū)動(dòng)器 " & d.DriveLetter & ": - " & t
    If d.IsReady Then 
        s = s & "<BR>" & "驅(qū)動(dòng)器已就緒。"
    Else
        s = s & "<BR>"  & "驅(qū)動(dòng)器未就緒。"
    End If
ShowDriveInfo = s
End Function

請(qǐng)參閱

AvailableSpace 屬性 | DriveLetter 屬性 | DriveType 屬性 | FileSystem 屬性 | FreeSpace 屬性 | Path 屬性 | RootFolder 屬性 | SerialNumber 屬性 | ShareName 屬性 | TotalSize 屬性 | VolumeName 屬性

應(yīng)用于:Drive 對(duì)象