AD-Abfrage mit VB - Object Identifier ?!

[formaldehyd]

Hallo, ich steh hier vor nem kleinen Problem.

Ich will ne AD Abfrage machen, das ist soweit auch kein Problem, nur leider schaff ichs nicht, mir die Werte aus nem Feld des Types "Object Identifier" zu holen ...

Die LDAP Verbindung steht und funktioniert wunderbar, wie alle anderen Parts des Scripts, jedoch eben der gewünschte Part nicht.


mal kurz mein Code :

For each oMember in oGroup2.Members
	on error resume next

       strKST = oMember.***COSTCENTER
	strName = oMember.displayname

	IF strName="" THEN
		strName = oMember.name
		strName = Mid(Str, 4)
	ELSE	
		strName = oMember.displayname
	END IF
             [... hier soll die nächste Abfrage hin ...]
Next

Ich habs dann mit 2 Lösungsansätzen probiert, leider beide fehlgeschlagen:

objUser.GetInfoEx Array("allowedAttributesEffective"), 0
	arrAllowedAttributesEffective = objUser.GetEx("allowedAttributesEffective")
	IF arrAllowedAttributesEffective(3)="msTSLSProperty01" THEN      
             	strTsu="Ja"
	ELSE
		strTsu="Nein"
	END IF

bzw.:

arrAAE = objUser.GetEx("allowedAttributesEffective")
	For Each strValue in arrAAE
		IF strValue="msTSLSProperty01" THEN
			strTsu="JA"
		ELSE
			'nix
		END IF
	Next

Das Feld welches ich auslesen möchte ist wie folgt befüllt
< msDS-NcType;msPKI-CredentialRoamingToken;msTSLSProperty02;msTSLSProperty01;msTSManagingLS4;...> da führt sich ne ewigkeit so weiter...

Ich suche also nach Usern bei denen beim Attribut "allowedAttributeEffective" folgener Eintrag vorhanden ist: msTSLSProperty01

Diesen Usern werden bestimmte Zugänge eingeräumt.

Allerdings, egal wie ichs nun mach, ich krieg immer nur leere Werte übergeben

ich hoffe mir kann da jemand helfen

gruß

 

[formaldehyd]

push ...

irgendjemand ?