当前位置: 首页 > 图文教程 > 脚本技术 > VBScript > VBS教程:方法-DriveExists 方法

VBScript
VBS中SendKeys的基本应用
VBScript教程 第十四课在VBScript中使用对象
VBScript教程 第十三课 VBScript与窗体
VBScript教程 第十二课VBScript页面的简单样例
VBScript教程 第十一课深入VBScript
VBScript教程 第十课 VBScript编码约定
VBScript教程 第九课VBScript过程
VBScript教程 第八课 使用循环语句
VBScript教程 第七课使用条件语句
VBScript教程 第六课VBScript运算符
VBscript教程 第五课 VBScript常数
VBScript教程 第四课VBScript变量
VBScript教程 第三课VBScript数据类型
VBScript教程 第二课在HTML页面中添加VBscript代码
VBScript教程 第一课什么是VBScript
VBScript的入门学习资料
VBScript语法速查及实例说明
MsgBox函数语言参考
VBS教程:正则表达式简介 -后向引用
VBS教程:正则表达式简介 -选择与编组

VBScript 中的 VBS教程:方法-DriveExists 方法


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-11   浏览: 43 ::
收藏到网摘: n/a

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

请参阅