Visual Basic Scripting Edition | 语言参考 |
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 对象 返回首页 |