国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > VBScript > 正文

VBS教程:屬性-IsReady 屬性

2020-07-26 12:13:36
字體:
來源:轉載
供稿:網友

IsReady 屬性

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

object.IsReady

object 應為 Drive 對象的名稱。

說明

對于可移動媒體驅動器和 CD-ROM 驅動器,僅當插入相應的媒體并準備接受訪問時,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 = "網絡"        Case 4: t = "CD-ROM"        Case 5: t = "RAM 磁盤"    End Select    s = "驅動器 " & d.DriveLetter & ": - " & t    If d.IsReady Then         s = s & "<BR>" & "驅動器已就緒。"    Else        s = s & "<BR>"  & "驅動器未就緒。"    End IfShowDriveInfo = sEnd Function
發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 含山县| 永嘉县| 清水县| 和硕县| 屏南县| 通山县| 寿宁县| 沂水县| 达拉特旗| 阿合奇县| 宁国市| 大冶市| 湛江市| 昌平区| 铁岭县| 乌兰察布市| 大同县| 昌宁县| 衡阳县| 宁强县| 福鼎市| 盐津县| 观塘区| 边坝县| 冷水江市| 卢湾区| 常山县| 霞浦县| 乌拉特中旗| 石首市| 鄂伦春自治旗| 常德市| 沽源县| 高清| 同德县| 霍山县| 长宁区| 临猗县| 北票市| 沙河市| 石景山区|