本页面由网页陶吧 龙犊收集整理 时间是: 02/05/06 下午 05:59:05.
页面地址: vsmthDriveExists.htm
标题: DriveExists 方法  •  文件大小: 2361  •  更新时间: Sun, 05 Feb 2006 03:21:34 GMT

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 = msg
End Function

请参阅

Drive 对象 | Drives 集合 | FileExists 方法 | FolderExists 方法 | GetDrive 方法 | GetDriveName 方法 | IsReady 属性

应用于:FileSystemObject 对象