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 = s
End Function

请参阅

Drives 集合 | Files 属性 | SubFolders 属性

应用于:FileSystemObject 对象