亚洲乱码中文字幕综合,中国熟女仑乱hd,亚洲精品乱拍国产一区二区三区,一本大道卡一卡二卡三乱码全集资源,又粗又黄又硬又爽的免费视频

VBS教程:屬性-IsReady 屬性

 更新時間:2006年11月16日 00:00:00   作者:  

IsReady 屬性

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

object.IsReady

object 應為 Drive 對象的名稱。

說明

對于可移動媒體驅(qū)動器和 CD-ROM 驅(qū)動器,僅當插入相應的媒體并準備接受訪問時,IsReady 返回 True

以下代碼舉例說明如何使用 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 = "可移動"        Case 2: t = "固定"        Case 3: t = "網(wǎng)絡"        Case 4: t = "CD-ROM"        Case 5: t = "RAM 磁盤"    End Select    s = "驅(qū)動器 " & d.DriveLetter & ": - " & t    If d.IsReady Then         s = s & "<BR>" & "驅(qū)動器已就緒。"    Else        s = s & "<BR>"  & "驅(qū)動器未就緒。"    End IfShowDriveInfo = sEnd Function

相關(guān)文章

最新評論