Configurando o Visual Basic 6.0 para desenvolvimento ADSI
Configurando o ambiente de desenvolvimento do Microsoft Visual Studio 2010 para Visual Basic
Inicie o Visual Studio 2010.
Crie um novo projeto Visual Basic.
Adicione uma referência à Active DS Type Library.
Observação
Se você não exigir a vinculação antecipada de objetos COM, ignore esta etapa.
- Selecionar Projeto | Adicionar referência.
- Selecione a guia COM .
- Selecione Active DS Type Library.
Comece a programar com ADSI.
Antes de começar, faça logon em um domínio do Windows. Você deve ter permissão para modificar o banco de dados do Active Directory. Por padrão, o administrador tem esse privilégio.
Um aplicativo Visual Basic 6.0 de exemplo: Modificando FullName e descrição para um usuário
Siga as etapas anteriores para criar um projeto executável padrão do Visual Basic.
Clique duas vezes no formulário. Em Form_Load, digite o seguinte. Você deve substituir a cadeia de caracteres "LDAP://CN=jeffsmith,CN=users,DC=fabrikam,DC=com" pelo ADsPath de um usuário existente em um contêiner em seu domínio. Crie uma conta de usuário de teste que possa ser modificada para essa finalidade.
'------------------------------------------------------------ ' This code example is used to set the FullName and Description '------------------------------------------------------------ Dim usr As IADsUser ' Bind to a user object. Set usr = GetObject("LDAP://CN=jeffsmith,CN=users,DC=fabrikam,DC=com") usr.FullName = "Jeff Smith" usr.Description = "A user for fabrikam.com" usr.SetInfo ' Commit the changes to the directory
Pressione <F5> para executar o programa.
Para verificar as alterações, use a ferramenta de gerenciamento Usuários e Computadores do Active Directory. Para obter mais informações sobre como usar ADSI e Visual Basic, consulte Acessando o Active Directory usando o Visual Basic.