IADsUser 接口 (iads.h)

项目
08/24/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
组	域用户
Profile	空
帐户永不过期	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

新创建的本地用户将具有与域用户相同的默认属性。但是，组成员身份将是“用户”，而不是“域用户”。