ShareName 属性
返回指定驱动器的网络共享名称。
语法
对象。ShareName
对象始终是 Drive 对象。
备注
如果 object 不是网络驱动器,则 ShareName 属性将返回零长度字符串 ("")。
以下代码演示如何使用 ShareName 属性。
Sub ShowDriveInfo(drvpath)
Dim fs, d, s
Set fs = CreateObject("Scripting.FileSystemObject")
Set d = fs.GetDrive(fs.GetDriveName(fs.GetAbsolutePathName(drvpath)))
s = "Drive " & d.DriveLetter & ": - " & d.ShareName
MsgBox s
End Sub
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。