| DriveExists 方法 |
|
DriveExists 方法语法有以下部分:
| 部分 | 描述 |
| object | 必选。应为 FileSystemObject 对象的名称。 |
| drivespec | 必选。驱动器号或指定的完整路径。 |
下面例子举例说明如何使用 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