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

Microsoft® Visual Basic® Scripting Edition
ShareName 屬性
 語(yǔ)言參考  
版本 3  

請(qǐng)參閱                   應(yīng)用于


描述
返回指定的驅(qū)動(dòng)器的網(wǎng)絡(luò)共享名。
語(yǔ)法
object.ShareName

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

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

以下代碼舉例說(shuō)明如何使用 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òng)器 " & d.DriveLetter & ": - " & d.ShareName
    MsgBox s
End Sub