IADsUser 介面 (iads.h)

發行項
03/14/2023

IADsUser介面是繼承自IAD 的雙重介面。其設計目的是要代表和管理網路上的使用者帳戶。呼叫這個介面的方法，以存取及操作使用者帳戶資料。這類資料包括使用者名稱、電話號碼、職稱等等。此介面支援用來判斷使用者群組關聯，以及設定或變更密碼的功能。

若要透過 WinNT 提供者系結至網域使用者，請使用功能變數名稱作為 ADsPath 的一部分，如下列程式碼範例所示。

GetObject("WinNT://MYDOMAIN/jeffsmith,user")

同樣地，使用電腦名稱稱作為 ADsPath 的一部分，以系結至本機使用者。

GetObject("WinNT://MYCOMPUTER/jeffsmith,user")

在 Active Directory 中，網域使用者位於目錄中。下列程式碼範例示範如何透過 LDAP 提供者系結至網域使用者。

GetObject("LDAP://CN=Jeff Smith,OU=Sales,DC=Fabrikam,DC=Com")

不過，本機帳戶位於本機 SAM 資料庫中，而 LDAP 提供者不會與本機資料庫通訊。因此，若要系結至本機使用者，您必須流覽 WinNT 提供者，如第二個程式碼範例中所述。

繼承

IADsUser介面繼承自IDispatch和IAD。 IADsUser 也有下列類型的成員：

方法

IADsUser介面具有這些方法。


IADsUser：：ChangePassword 將使用者密碼從指定的舊值變更為新值。
IADsUser：：Groups 取得這個使用者所屬 ADSI 群組物件的集合。
IADsUser：：SetPassword 將使用者密碼設定為指定的值。

備註

如同任何其他 ADSI 物件，容器物件會建立 Windows 使用者帳戶物件。首先，系結至容器物件。然後，呼叫 IADsContainer：：Create 方法，並指定強制或選擇性屬性。

使用 WinNT 時，您不需要在建立使用者時指定任何其他屬性。您可以呼叫 IADsContainer：：Create 方法來直接建立使用者物件。

Dim dom As IADsContainer
Dim usr As IADsUser

On Error GoTo Cleanup

Set dom = GetObject("WinNT://MyDomain")
Set usr = dom.Create("user","jeffsmith")
usr.SetInfo

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

在此情況下，會使用下列預設值來建立網域使用者。

屬性	值
全名	SAM 帳戶名稱 (，例如 jeffsmith)
密碼	空白
使用者必須變更密碼	TRUE
使用者無法變更密碼	FALSE
密碼永不過期	FALSE
帳戶已停用	FALSE
群組	網域使用者
設定檔	空白
帳戶永不過期	TRUE

若要建立本機使用者，請系結至目的電腦，如下列程式碼範例所示。

Dim mach As IADsContainer
Dim usr as IADsUser

On Error GoTo Cleanup
Set mach = GetObject("WinNT://MyMachine,Computer")
Set usr = mach.Create("user","jeffsmith")
usr.SetInfo

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

新建立的本機使用者會有與網域使用者相同的預設屬性。不過，群組成員資格會是「使用者」，而不是「網域使用者」。