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

首頁(yè) > 編程 > VBScript > 正文

VBS教程:方法-DriveExists 方法

2020-06-26 17:57:40
字體:
來(lái)源:轉(zhuǎn)載
供稿:網(wǎng)友

DriveExists 方法

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

object.DriveExists(drivespec)

參數(shù)

object

必選項(xiàng)。應(yīng)為 FileSystemObject 對(duì)象的名稱。

drivespec

必選項(xiàng)。驅(qū)動(dòng)器號(hào)或指定的完整路徑。

說(shuō)明

對(duì)于可移動(dòng)媒體驅(qū)動(dòng)器,即使驅(qū)動(dòng)器中沒(méi)有插入媒體,DriveExists 方法仍返回 True。用 Drive 對(duì)象的 IsReady 屬性確定驅(qū)動(dòng)器是否就緒。

下面例子舉例說(shuō)明如何使用 DriveExists 方法:

 Function ReportDriveStatus(drv)   Dim fso, msg  Set fso = CreateObject("Scripting.FileSystemObject")  If fso.DriveExists(drv) Then    msg = ("驅(qū)動(dòng)器 " & UCase(drv) & " 存在。")  Else    msg = ("驅(qū)動(dòng)器 " & UCase(drv) & " 不存在。")  End If  ReportDriveStatus = msgEnd Function
發(fā)表評(píng)論 共有條評(píng)論
用戶名: 密碼:
驗(yàn)證碼: 匿名發(fā)表
主站蜘蛛池模板: 甘洛县| 满洲里市| 长泰县| 石棉县| 章丘市| 涿州市| 尤溪县| 洪湖市| 临桂县| 永平县| 乐亭县| 吴桥县| 柯坪县| 威宁| 台中县| 玛沁县| 张家界市| 秦皇岛市| 陆丰市| 桦甸市| 汨罗市| 铁力市| 彭阳县| 襄樊市| 巴塘县| 五台县| 富阳市| 鹿邑县| 丹江口市| 寿阳县| 偏关县| 阜新| 汉沽区| 涞源县| 高碑店市| 深水埗区| 阿拉尔市| 凯里市| 姜堰市| 舞阳县| 阳高县|