Drives 屬性

返回由本地機(jī)器上所有 Drive 對(duì)象組成的 Drives 集合。

object.Drives

object 應(yīng)為 FileSystemObject 對(duì)象的名稱。

說明

無論是否插入媒體，可移動(dòng)媒體驅(qū)動(dòng)器都顯示在 Drives 集合中。

您可以使用 For Each...Next 結(jié)構(gòu)枚舉 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

最新評(píng)論