Visual Basic Scripting Edition | 語言參考 |
SerialNumber 屬性返回十進制序列號,用于唯一標(biāo)識一個磁盤卷。 object.SerialNumber
object 應(yīng)為 Drive 對象的名稱。 說明可以使用 SerialNumber 屬性以確保在可移動媒體驅(qū)動器中插入正確的磁盤。 以下代碼舉例說明如何使用 SerialNumber 屬性: Function ShowDriveInfo(drvpath)
Dim fso, d, s, t
Set fso =CreateObject("Scripting.FileSystemObject")
Set d =fso.GetDrive(fso.GetDriveName(fso.GetAbsolutePathName(drvpath)))
Select Case d.DriveType
Case 0: t =" 未知"
Case 1: t =" 可移動" Case 2: t =" 固定" Case 3: t =" 網(wǎng)絡(luò)" Case 4: t ="CD-ROM" Case 5: t ="RAM 磁盤" End Select s =" 驅(qū)動器 " & d.DriveLetter & ": - " & t s =s & "<BR>" & " 序列號:" & d.SerialNumber ShowDriveInfo =s End Function
請參閱AvailableSpace 屬性 | DriveLetter 屬性 | DriveType 屬性 | FileSystem 屬性 | FreeSpace 屬性 | IsReady 屬性 | Path 屬性 | RootFolder 屬性 | ShareName 屬性 | TotalSize 屬性 | VolumeName 屬性 應(yīng)用于:Drive 對象 返回首頁 |