Interface IADsUser (iads.h)
A interface IADsUser é uma interface dupla que herda de IADs. Ele foi projetado para representar e gerenciar uma conta de usuário final em uma rede. Chame os métodos dessa interface para acessar e manipular dados de conta de usuário final. Esses dados incluem nomes do usuário, números de telefone, cargo e assim por diante. Essa interface dá suporte a recursos para determinar a associação de grupo do usuário e para definir ou alterar a senha.
Para associar a um usuário de domínio por meio de um provedor WinNT, use o nome de domínio como parte do ADsPath, conforme mostrado no exemplo de código a seguir.
GetObject("WinNT://MYDOMAIN/jeffsmith,user")
Da mesma forma, use o nome do computador como parte do ADsPath para associar a um usuário local.
GetObject("WinNT://MYCOMPUTER/jeffsmith,user")
No Active Directory, os usuários de domínio residem no diretório. O exemplo de código a seguir mostra como associar a um usuário de domínio por meio de um provedor LDAP.
GetObject("LDAP://CN=Jeff Smith,OU=Sales,DC=Fabrikam,DC=Com")
No entanto, as contas locais residem no banco de dados SAM local e o provedor LDAP não se comunica com o banco de dados local. Portanto, para associar a um usuário local, você deve passar por um provedor WinNT, conforme descrito no segundo exemplo de código.
Herança
A interface IADsUser herda de IDispatch e IADs. IADsUser também tem esses tipos de membros:
Métodos
A interface IADsUser tem esses métodos.
| IADsUser::ChangePassword Altera a senha do usuário do valor antigo especificado para um novo valor. |
| IADsUser::Groups Obtém uma coleção dos objetos de grupo ADSI aos quais este usuário pertence. |
| IADsUser::SetPassword Define a senha do usuário como um valor especificado. |
Comentários
Assim como acontece com qualquer outro objeto ADSI, o objeto contêiner cria um objeto de conta de usuário do Windows. Primeiro, associe-se a um objeto de contêiner. Em seguida, chame o método IADsContainer::Create e especifique atributos obrigatórios ou opcionais.
Com o WinNT, você não precisa especificar nenhum atributo adicional ao criar um usuário. Você pode chamar o método IADsContainer::Create para criar o objeto de usuário diretamente.
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
Nesse caso, um usuário de domínio é criado com os seguintes valores padrão.
| Propriedade | Valor |
|---|---|
| Nome completo | Nome da conta SAM (como jeffsmith) |
| Senha | Vazio |
| O usuário deve alterar a senha | TRUE |
| Usuário não pode alterar senha | FALSE |
| A senha nunca expira | FALSE |
| Conta Desabilitada | FALSE |
| Grupo | Usuário do Domínio |
| Perfil | Vazio |
| A conta nunca expira | TRUE |
Para criar um usuário local, associe-se a um computador de destino, conforme mostrado no exemplo de código a seguir.
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
O usuário local recém-criado terá as mesmas propriedades padrão que o usuário de domínio. No entanto, a associação ao grupo será "usuários", em vez de "usuário de domínio".
Requisitos
| Cliente mínimo com suporte | Windows Vista |
| Servidor mínimo com suporte | Windows Server 2008 |
| Plataforma de Destino | Windows |
| Cabeçalho | iads.h |