VBS教程：属性-IsReady 属性
更新时间：2006年11月16日 00:00:00 作者：
IsReady 属性
如果指定的驱动器就绪，返回 True；否则返回 False。
object.IsReady
object 应为 Drive 对象的名称。
说明
对于可移动媒体驱动器和 CD-ROM 驱动器，仅当插入相应的媒体并准备接受访问时，IsReady 返回 True。
以下代码举例说明如何使用 IsReady 属性：
Function ShowDriveInfo(drvpath) Dim fso, d, s, t Set fso = CreateObject("Scripting.FileSystemObject") Set d = fso.GetDrive(drvpath) Select Case d.DriveType Case 0: t = "未知"Case 1: t = "可移动"Case 2: t = "固定"Case 3: t = "网络"Case 4: t = "CD-ROM"Case 5: t = "RAM磁盘"End Selects = "驱动器" & d.DriveLetter & ": - " & tIf d.IsReady Thens = s & "<BR>" & "驱动器已就绪。"Elses = s & "<BR>" & "驱动器未就绪。"End IfShowDriveInfo = sEnd Function
相关文章
用vbscript实现修改屏幕保护的等待时间长度...2007-04-04
让批处理被wsh解析的优点...2007-03-03
打算考虑写个python版的，考虑大家的机器环境还是弄了个vbs版2009-07-07
下面的VBS脚本就是实现的工作表按指定表头（由用户选择）自动分表功能。需要的朋友只要将要操作的工作表拖放到脚本文件上即可轻松实现工作表分表2013-01-01
数据库异地备份对一个网站来说是非常必要的，这里谈一下使用批处理文件对数据库异地本份的过程2006-06-06
内容加密vbs实现代码 本人不能保证文件能改过来.请大家先测试下，注意备份。2009-09-09
VBS教程：VBScript 语句-Select Case 语句
Select Case 语句可以是嵌套的，每一层嵌套的 Select Case 语句必须有与之匹配的 End Select 语句2006-11-11
VBS教程：函数-TimeSerial 函数...2006-11-11
vbs中实现启动两个应用程序，一直等到其中一个程序结束，然后关闭另一个？
vbs中实现启动两个应用程序，一直等到其中一个程序结束，然后关闭另一个？...2007-04-04
用户帐户控制（UAC）是Vista以上的系统新引进的功能，旨在提高系统的安全性。它限制应用程序在标准用户的权限下，除非管理员权限得到提升或验证。2011-01-01
最新评论