Utilizamos cookies propias y de terceros. Al navegar entendemos que aceptas el uso de cookies. +Info.
Política de cookies
Proyecto AjpdSoft

· Inicio
· Buscar
· Contactar
· Cookies
· Descargas
· Foros
· Historia
· Nosotros
· Temas
· Top 10
· Trucos
· Tutoriales
· Usuario
· Wiki

Proyecto AjpdSoft: Foros

AjpdSoft :: Ver tema - Error -2147023541 (8007054b) en ldap visual basic
Foros de discusión Buscar Perfil FAQ Iniciar sesión
Information Error -2147023541 (8007054b) en ldap visual basic

Publicar nuevo tema Responder al tema
Foros de discusión » VB.Net, C# .Net, Visual Studio .Net   
Ver tema anterior :: Ver tema siguiente
AutorMensaje
varios
Magnífico usuario


Registrado: Oct 10, 2006
Mensajes: 2092

Asunto: Error -2147023541 (8007054b) en ldap visual basic Responder citando

Estoy haciendo una aplicación Visual Basic que obtenga un listado de los usuarios del dominio Windows Server 2003. Para la conexión con el LDAP de Active Directory utilizo el siguiente código:

Código:

  Dim rootDSE

  Set rootDSE = GetObject("LDAP://RootDSE")
  ...


Cuando lo compilo con Visual Basic 6, en la primera línea, me da este error:

error -2147023541 (8007054b) en tiempo de ejecución:

error de automatización


¿A qué se puede deber? la verdad es que el error no es muy descriptivo.
MensajePublicado:
Jue Oct 23, 2008 11:41 am
Top of PageVer perfil de usuario
alonsojpd
Administrador/Moderador


Registrado: Sep 16, 2003
Mensajes: 2687

Asunto: Re: Error -2147023541 (8007054b) en ldap visual basic Responder citando



Anuncios



varios escribió:
Estoy haciendo una aplicación Visual Basic que obtenga un listado de los usuarios del dominio Windows Server 2003. Para la conexión con el LDAP de Active Directory utilizo el siguiente código:

Código:

  Dim rootDSE

  Set rootDSE = GetObject("LDAP://RootDSE")
  ...


Cuando lo compilo con Visual Basic 6, en la primera línea, me da este error:

error -2147023541 (8007054b) en tiempo de ejecución:

error de automatización


¿A qué se puede deber? la verdad es que el error no es muy descriptivo.


Este error suele ser debido a que debes indicar el nombre del dominio o equipo Windows Server 2003, del que obtener los usuarios de Active Directory mediante LDAP.

Te mostramos un ejemplo de código para hacer esto, este código Visual Basic 6 obtiene los usuarios del servidor: nombre, nombre completo, email, teléfono y descripción:

Código:

Private Sub usuariosLDAP_Click()
    Dim rootDSE
    Dim listaUsuarios
    Dim usuarioActual
   
    Set rootDSE = GetObject("LDAP://nombre_servidor/RootDSE")
   
    Set listaUsuarios = GetObject("LDAP://nombre_servidor/" & "CN=Users," & rootDSE.Get("defaultNamingContext"))
   
    mListaUsuarios.Text = "Nombre usuario, Nombre completo, Descripción, Teléfono, Email"
    listaUsuarios.Filter = Array("user")
    For Each usuarioActual In listaUsuarios
          mListaUsuarios.Text = mListaUsuarios.Text & vbCrLf & _
          Chr(34) & usuarioActual.sAMAccountName & Chr(34) & Chr(44) & _
          Chr(34) & usuarioActual.DisplayName & Chr(34) & Chr(44) & _
          Chr(34) & usuarioActual.Description & Chr(34) & Chr(44) & _
          Chr(34) & usuarioActual.TelephoneNumber & Chr(34) & Chr(44) & _
          Chr(34) & usuarioActual.mail & Chr(34)
    Next

End Sub


Donde:

* nombre_servidor: nombre del servidor con Windows Server 2003, también sirve el nombre del dominio Windows Server.
* mListaUsuarios: componente de tipo TextBox, con la propiedad Multiline a True.
MensajePublicado:
Jue Oct 23, 2008 12:03 pm
Top of PageVer perfil de usuario
Mostrar mensajes de anteriores:   
Todas las horas son GMT - 1 Horas
Publicar nuevo tema Responder al tema
Foros de discusión » VB.Net, C# .Net, Visual Studio .Net  

Cambiar a:  
Key
  Puede publicar nuevos temas en este foro
No puede responder a temas en este foro
No puede editar sus mensajes en este foro
No puede borrar sus mensajes en este foro
No puede votar en encuestas en este foro
Este sitio web NO CONTIENE malware, todos los programas con código fuente aquí. Autor: Alonso Javier Pérez Díaz Google+ Síguenos en Google+