VBS教程：属性-Drives 属性

171 阅读 0 评论 113 点赞

我是靠谱客的博主欢喜咖啡，最近开发中收集的这篇文章主要介绍VBS教程：属性-Drives 属性，觉得挺不错的，现在分享给大家，希望可以做个参考。

概述

Drives 属性

返回由本地机器上所有 Drive 对象组成的 Drives 集合。

object.Drives

object 应为 FileSystemObject 对象的名称。

说明

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

您可以使用 For Each...Next 结构枚举 Drives 集合的成员，如下例所示：

Function 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 = 3 Then         n = d.ShareName      ElseIf d.IsReady Then         n = d.VolumeName      End If      s = s & n & "<BR>"   Next   ShowDriveList = sEnd Function