欧美bbbwbbbw肥妇,免费乱码人妻系列日韩,一级黄片

請參閱                   應(yīng)用于

描述

返回指定的驅(qū)動器的網(wǎng)絡(luò)共享名。

語法

object.ShareName

object 應(yīng)為 Drive 對象的名稱。

說明

如果 object 不是一個(gè)網(wǎng)絡(luò)驅(qū)動器，則 ShareName 屬性返回零長度字符串 ("")。

以下代碼舉例說明如何使用 ShareName 屬性：

Sub ShowDriveInfo(drvpath)
    Dim fs, d, s 
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set d = fs.GetDrive(fs.GetDriveName(fs.GetAbsolutePathName(drvpath)))
    s = "驅(qū)動器 " & d.DriveLetter & ": - " & d.ShareName
    MsgBox s
End Sub