VBS属性IsReady的用法-创新互联
这篇文章主要介绍“VBS属性IsReady的用法”,在日常操作中,相信很多人在VBS属性IsReady的用法问题上存在疑惑,小编查阅了各式资料,整理出简单好用的操作方法,希望对大家解答”VBS属性IsReady的用法”的疑惑有所帮助!接下来,请跟着小编一起来学习吧!
创新互联长期为成百上千客户提供的网站建设服务,团队从业经验10年,关注不同地域、不同群体,并针对不同对象提供差异化的产品和服务;打造开放共赢平台,与合作伙伴共同营造健康的互联网生态环境。为宜章企业提供专业的成都网站设计、成都网站建设,宜章网站改版等技术服务。拥有十年丰富建站经验和众多成功案例,为您定制开发。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 Select s = "驱动器 " & d.DriveLetter & ": - " & t If d.IsReady Then s = s & "
" & "驱动器已就绪。" Else s = s & "
" & "驱动器未就绪。" End IfShowDriveInfo = sEnd Function
到此,关于“VBS属性IsReady的用法”的学习就结束了,希望能够解决大家的疑惑。理论与实践的搭配能更好的帮助大家学习,快去试试吧!若想继续学习更多相关知识,请继续关注创新互联网站,小编会继续努力为大家带来更多实用的文章!
新闻标题:VBS属性IsReady的用法-创新互联
分享链接:http://pwwzsj.com/article/dcohed.html