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

VBS教程：属性-ShareName 属性

原文：http://www.jb51.net/article/4418.htm