DriveExists 方法

如果指定的驱动器存在，则返回 True；否则返回 False。

object.DriveExists(drivespec)

参数

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 = msgEnd Function

请参阅

VBS教程：方法-DriveExists 方法

原文：http://www.jb51.net/article/4484.htm