Re: LDAP - vbscript

On 18 Apr 2006 01:12:05 -0700, demonstrator wrote:

> Próbuję (podłączyć się) wyświetlić drzewko LDAP na stacji
> roboczej podłączając się skryptem vbs
> Mam nastepujący skrypt w vbs:
>
> strBaseDN = "<LDAP://dc=test,dc=local>;"
> strFilter = "(&(objectclass=*)(objectcategory=*));"
> strAttrs = "cn;"
> strScope = "subtree"
> set objConn = CreateObject("ADODB.Connection")
> objConn.Provider = "ADsDSOObject"
>
> objConn.Properties("User ID") = "administrator"
> objConn.Properties("Password") = "dobrehaslo"
>
> objConn.Open "Active Directory Provider"
>
> Wscript.Echo ">>" & strBaseDN & strFilter & strAttrs & strScope & "<<"
>
> set objRS = objConn.Execute(strBaseDN & strFilter & strAttrs &
> strScope)
>
> objRS.MoveFirst
> while Not objRS.EOF
> Wscript.Echo objRS.Fields(0).Value
> objRS.MoveNext
> wend
> ---------------------------------------------------------------------------------------------------------------
> strBaseDN jest na pewno OK haslo admina jest na pewno OK
> Dostaję taki komunikat !!!
>
> Skrypt: (sciezka do mojego skryptu)
> Wiersz: 16
> Znak:1
> Błąd: Odmowa uprawnień
> Kod: 80040E09
> Źródło: Provider
>
> Proszę o POMOC!!!

A po co są "<" i ">" w connect stringu (strBaseDN)? Ja odwołuję się np
poprzez coś takiego :
Set LDAPUsers =
SetObject("LDAP://serwer1/OU=Uzytkownicy,OU=Grupa1,DC=serwer,DC=domena")
i działa doskonale.

A do pobierania dokładnych ścieżek LDAPowych polecam ADSIEdit - doskonałe
narzędzie :)

-- 
Pozdrawiam
Piotrek