VBS教程:属性-ShareName 属性

(编辑:jimmy 日期: 2024/12/23 浏览:2)

ShareName 属性

返回指定的驱动器的网络共享名。

object.ShareName

object 应为 Drive 对象的名称。

说明

如果 object 不是一个网络驱动器,则 ShareName 属性返回零长度字符串 ("")。

以下代码举例说明如何使用 ShareName 属性:

Function ShowDriveInfo(drvpath)   Dim fso, d   Set fso = CreateObject("Scripting.FileSystemObject")   Set d = fso.GetDrive(fso.GetDriveName(fso.GetAbsolutePathName(drvpath)))   ShowDriveInfo = "Drive " & d.DriveLetter & ": - " & d.ShareNameEnd Function