返回一個(gè)描述指定驅(qū)動(dòng)器的類型的值。
object.DriveType
object 應(yīng)為 Drive 對象的名稱。
以下代碼舉例說明如何使用 DriveType 屬性:
Function ShowDriveType(drvpath) Dim fso, d, t Set fso = CreateObject("Scripting.FileSystemObject") Set d = fso.GetDrive(drvpath) Select Case d.DriveType Case 0: t = "
未知"
Case 1: t = "
可移動(dòng)"
Case 2: t = "
固定"
Case 3: t = "
網(wǎng)絡(luò)"
Case 4: t = "CD-ROM"
Case 5: t = "RAM
磁盤"
End Select
ShowDriveType = "
驅(qū)動(dòng)器" & d.DriveLetter & ": - " & t
End Function
|
新聞熱點(diǎn)
疑難解答
圖片精選