只讀所有可用驅(qū)動(dòng)器的集合。
無論是否插入媒體,可移動(dòng)媒體驅(qū)動(dòng)器都顯示在 Drives 集合中。
以下代碼舉例說明如何獲得 Drives 集合并使用 For Each...Next 語句枚舉集合成員:
ShowDriveList函數(shù)Dim fso, d, dc, s, nSet fso = CreateObject("Scripting.FileSystemObject")Set dc = fso.DrivesFor Each d in dcn = ""s = s & d.DriveLetter & " - "If d.DriveType = Remote Thenn = d.ShareNameElseIf d.IsReady Thenn = d.VolumeNameEnd Ifs = s & n &"<BR>"NextShowDriveList = sEnd Function
新聞熱點(diǎn)
疑難解答
圖片精選