IADsFileShare 屬性方法

IADsFileshare介面的屬性方法會取得或設定下表所述的屬性。 如需詳細資訊，請參閱 介面屬性方法。

屬性

CurrentUserCount

連線到共用的使用者數目。

存取類型：唯讀

腳本資料類型： LONG

// C++ method syntax
HRESULT get_CurrentUserCount(
  [out] LONG* plCurrentUserCount
);

說明

檔案共用的描述。

存取類型：讀取/寫入

腳本資料類型： BSTR

// C++ method syntax
HRESULT get_Description(
  [out] BSTR* pbstrDescription
);
HRESULT put_Description(
  [in] BSTR bstrDescription
);

HostComputer

主機電腦的 ADsPath 參考。

存取類型：讀取/寫入

腳本資料類型： BSTR

// C++ method syntax
HRESULT get_HostComputer(
  [out] BSTR* pbstrHostComputer
);
HRESULT put_HostComputer(
  [in] BSTR bstrHostComputer
);

MaxUserCount

一次允許存取共用的使用者數目上限。

存取類型：唯讀

腳本資料類型： LONG

// C++ method syntax
HRESULT get_MaxUserCount(
  [out] LONG* plMaxUserCount
);

路徑

共用目錄的檔案系統路徑。

存取類型：讀取/寫入

腳本資料類型： BSTR

// C++ method syntax
HRESULT get_Path(
  [out] BSTR* pbstrPath
);
HRESULT put_Path(
  [in] BSTR bstrPath
);

範例

若要存取電腦上的檔案共用屬性，您必須先系結至電腦上的 「LanmanServer」。 下列程式碼範例示範如何在預設網域中設定所有公用檔案共用的描述和允許的使用者數目上限，命名為 「myMachine」。

Dim fs As IADsFileService
Dim share As IADsFileShare
On Error GoTo Cleanup

Set fs = GetObject("WinNT://myMachine/LanmanServer")
If (fs.class = "FileService") Then
    For Each share In fs
        share.description = share.name & " is my working folder."
        share.MaxUserCount =  10
        share.SetInfo
    Next share
End if

Cleanup:
    If (Err.Number<>0) Then
        MsgBox("An error has occurred. " & Err.Number)
    End If
    Set fs = Nothing
    Set share = Nothing

下列程式碼範例示範如何將現有的 C：\MyFolder 目錄設為公用檔案共用。

Dim fs As IADsFileShare
Dim cont As IADsContainer
On Error GoTo Cleanup
 
Set cont = GetObject("WinNT://yourDomain/yourMachineName/LanmanServer")
 
Set fs = cont.Create("FileShare", "Public")
Debug.Print fs.Class
fs.Path = "C:\MyFolder"
fs.SetInfo

Cleanup:
    If (Err.Number<>0) Then
        MsgBox("An error has occurred. " & Err.Number)
    End If
    Set cont = Nothing
    Set fs = Nothing

下列程式碼範例會讓現有的 C：\MyFolder 目錄成為公用檔案共用。

IADsFileShare *pShare = NULL;
IADsContainer *pCont = NULL;
LPWSTR adsPath = L"WinNT://yourMachineName/LanmanServer";
HRESULT hr = S_OK;

hr = ADsGetObject(adsPath, IID_IADsContainer,(void**)&pCont);
if(FAILED(hr)) {goto Cleanup;}

hr = pCont->Create(CComBSTR("FileShare"), CComBSTR("Public"), (IDispatch**)&pShare);

if(FAILED(hr)) {goto Cleanup;}

hr = pShare->put_Path(CComBSTR("c:\\public"));

if(FAILED(hr)) {goto Cleanup;}

hr = pShare->SetInfo();

Cleanup:
    if(pCont) pCont->Release();
    if(pShare) pShare->Release();

規格需求

需求	值
最低支援的用戶端	Windows Vista
最低支援的伺服器	Windows Server 2008
標頭	Iads.h
DLL	Activeds.dll
IID	IID_IADsFileShare定義為 EB6DCAF0-4B83-11CF-A995-00AA006BC149

另請參閱

IADsService

IADsFileShare

Interface 屬性方法