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 = msg
End Function
請(qǐng)參閱