返回由本地機器上所有 Drive 對象組成的 Drives 集合。
object.Drives
object 應(yīng)為 FileSystemObject 對象的名稱。
無論是否插入媒體,可移動媒體驅(qū)動器都顯示在 Drives 集合中。
您可以使用 For Each...Next 結(jié)構(gòu)枚舉 Drives 集合的成員,如下例所示:
Function ShowDriveList Dim fso, d, dc, s, n Set fso = CreateObject("Scripting.FileSystemObject") Set dc = fso.DrivesFor Each d in dcn = ""s = s & d.DriveLetter & " - "If d.DriveType = 3 Thenn = d.ShareNameElseIf d.IsReady Thenn = d.VolumeNameEnd Ifs = s & n & "<BR>"NextShowDriveList = sEnd Function
新聞熱點
疑難解答
圖片精選