(编辑:jimmy 日期: 2024/12/23 浏览:2)
返回本地驱动器或网络共享的驱动器号。只读。
object.DriveLetter
object 应为 Drive 对象的名称。
如果指定的驱动器没有与驱动器号相关联(例如,一个网络共享未映射驱动器号),则 DriveLetter 属性返回零长度字符串 ("")。
以下代码举例说明如何使用 DriveLetter 属性:
Function ShowDriveLetter(drvPath) Dim fso, d, s Set fso = CreateObject("Scripting.FileSystemObject") Set d = fso.GetDrive(fso.GetDriveName(drvPath)) s = "Drive " & d.DriveLetter & ": - " s = s & d.VolumeName & "<BR>" s = s & "Free Space: " & FormatNumber(d.FreeSpace/1024, 0) s = s & " Kbytes" ShowDriveLetter = sEnd Function