Programmieren - alles kontrollieren 4.941 Themen, 20.708 Beiträge

VB-Script, LDAP: Provider error 80040e37 Table does not Exist

Yves3 / 1 Antworten / Baumansicht Nickles

Hallo

Ich schreibe eine Web-Applikation, die unter anderem in ActiveDirectory nach Benutzern suchen soll.
Hier der relevante Codeauschnitt:

set oConn = CreateObject("ADODB.Connection")
set oCommand = CreateObject("ADODB.Command")
set oRS = CreateObject("ADODB.Recordset")

oConn.Provider = "ADsDSOObject"
oConn.Open "ADs Provider"
set oCommand.ActiveConnection = oConn 'set the active connection

strQuery= "<LDAP://dc=vmserver2003dc,dc=vm-domain1,dc=local>;(cn=user_xyz);cn,givenname;Subtree"
oCommand.CommandText = strQuery
oCommand.Properties("Page Size") = 99 'a paged query is used to avoid Exchange LDAP server limits
set oRS = oCommand.Execute 'Execute the query


Leider erzeugt die letzte Zeile immer den in der Betreffzeile genannten Fehler.
Häufige Ursachen dafür seien fehlende Berechtigungen oder ein falsches LDAP Query.

Die Seite läuft im Moment auf einer virtuellen Maschine und einem Server2003 Betriebssystem. Im gleichen virtuellen Netzt ist ein Domaincontroller für die Domäne vm-domain1.local.
Das Script führe ich über den Browser als Domainuser aus und frage Informationen über einen anderen Domainuser ab.
Im Eventlog des Domaincontrollers sind keine Authentifizierungsversuche des Scripts festzustellen.

Könnt ihr in dem Code einen Fehler finden (insbesondere im LDAP Query), oder kennt ihr eventuell ein Tool, mit dem man Abfragen in dieser Form direkt ausführen kann, damit ich das so testen und das Problem einschränken kann? Habt ihr sonst noch eine Idee, wo der Fehler liegen könnte?

bei Antwort benachrichtigen