DriveExists 方法

描述
如果指定的驱动器存在,则返回 True;否则返回 False
语法
object.DriveExists(drivespec)

DriveExists 方法语法有以下部分:

部分 描述
object 必选。应为 FileSystemObject 对象的名称。
drivespec 必选。驱动器号或指定的完整路径。

说明
对于可移动媒体驱动器,即使驱动器中没有插入媒体,DriveExists 方法仍返回 True。用 Drive 对象的 IsReady 属性确定驱动器是否就绪。

下面例子举例说明如何使用 DriveExists 方法:

 Function ReportDriveStatus(drv) 
  Dim fso, msg
  Set fso = CreateObject("Scripting.FileSystemObject")
  If fso.DriveExists(drv) Then
    msg = ("驱动器 " & UCase(drv) & " 存在。")
  Else
    msg = ("驱动器 " & UCase(drv) & " 不存在。")
  End If
  ReportDriveStatus = msg
End Function



本文档由兄弟工作组制作完成,部分内容摘自因特网公开的文档资料,欢迎您和我们一起完善此文档。兄弟工作组网站: www.vrbrothers.com