VBS教程：对象-Drives 集合

时间:2021-03-17 人气:0

想了解VBS教程：对象-Drives 集合的相关内容吗，在本文为您仔细讲解的相关知识和一些Code实例，欢迎阅读和指正，我们先划重点：VBBSS教教程程对对象象DDrriivveess集集合合，下面大家一起来学习吧。

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

加载全部内容