Drives 集合

只读所有可用驱动器的集合。

说明

无论是否插入媒体，可移动媒体驱动器都显示在 Drives 集合中。

以下代码举例说明如何获得 Drives 集合并使用 For Each...Next 语句枚举集合成员：

ShowDriveList 函数    Dim fso, d, dc, s, n    Set fso = CreateObject("Scripting.FileSystemObject")    Set dc = fso.Drives    For Each d in dc     n = ""   s = s & d.DriveLetter & " - "         If d.DriveType = Remote Then            n = d.ShareName        ElseIf d.IsReady Then            n = d.VolumeName        End If        s = s & n &"<BR>"     Next   ShowDriveList = sEnd Function

同类文章

• VBS教程：函数-Sqr 函数
• VBS教程：属性-Line 属性
• 用VBS调用程序并对程序的运行情况进行监控的两个
• VBS如何察看或获得剪切板内容的脚本
• 下载文件到本地运行的vbs
• VBS教程：运算符-Or 运算符
• 脚本编程3 关于文件的读写
• IIS管理脚本之adsutil.vbs的使用说明
• vbs正则表达式代码
• 一段病毒常用的VBS代码
• 让IIS建立的站点默认是.net 2.0的,而不是.net 1.
• vbs 中调用shell.application 简单函数
• 用vbs发送带附件的邮件
• 用vbs实现不死帐号的代码
• VBScript教程 第四课VBScript变量
• Stream、WshShell、WshUrlShortcut对象及Shell.A

文章评论

共有 位脚本之家网友发表了评论我来说两句