Drives 屬性返回由本地機(jī)器上所有 Drive 對(duì)象組成的 Drives 集合。 object.Drives
object 應(yīng)為 FileSystemObject 對(duì)象的名稱(chēng)。 說(shuō)明無(wú)論是否插入媒體,可移動(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 =s End Function
請(qǐng)參閱Drives 集合 | Files 屬性 | SubFolders 屬性 應(yīng)用于:FileSystemObject 對(duì)象 返回首頁(yè) |