Configuración de Visual Basic 6.0 para el desarrollo de ADSI

Configuración del entorno de desarrollo de Microsoft Visual Studio 2010 para Visual Basic

1. Inicie Visual Studio 2010.

2. Cree un nuevo proyecto de Visual Basic.

3. Agregue una referencia a la biblioteca de tipos de DS activo.

   Nota

   Si no necesita un enlace de objetos COM temprano, omita este paso.

    

   1. Seleccionar proyecto | Agregar referencia.
   2. Seleccione la pestaña COM .
   3. Seleccione Biblioteca de tipos de DS activa.

4. Comience a programar con ADSI.

Antes de empezar, inicie sesión en un dominio de Windows. Debe tener permiso para modificar la base de datos de Active Directory. De forma predeterminada, el administrador tiene este privilegio.

Una aplicación de Visual Basic 6.0 de ejemplo: Modificar FullName y Descripción para un usuario

1. Siga los pasos anteriores para crear un proyecto de Visual Basic ejecutable estándar.

2. Haga doble clic en el formulario. En Form_Load, escriba lo siguiente. Debe reemplazar la cadena "LDAP://CN=jeffsmith,CN=users,DC=fabrikam,DC=com" por la cadena ADsPath de un usuario existente en un contenedor del dominio. Cree una cuenta de usuario de prueba que se pueda modificar para este fin.

   '------------------------------------------------------------
   ' 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
   

3. Presione <F5> para ejecutar el programa.

4. Para comprobar los cambios, use la herramienta de administración de Usuarios y equipos de Active Directory. Para obtener más información sobre el uso de ADSI y Visual Basic, consulte Acceso a Active Directory mediante Visual Basic.