Αρχίζουμε με τα απλά:
Τι γίνεται αν το Attribute name περιέχει τον χαρκτήρα “-“;
Ύστερα από αρκετό ψάξιμο βρίσκουμε το εξής post του γνωστού scripting guy:
http://blogs.technet.com/heyscriptingguy/archive/2005/06/21/how-can-i-retrieve-the-value-of-an-active-directory-attribute-that-has-a-hyphen-in-its-name.aspx
Τι γίνεται αν το Attribute name περιέχει τον χαρκτήρα “-“ ΚΑΙ είναι multivalued; Ooops πρόβλημα έτσι; Εμένα μου πήρε λίγη ωρίτσα να το βρώ, η λύση παρακάτω.
Option Explicit
Dim strMetaDataEntry, strDNSDomain, strContainer
Dim objGroup, objRootDSEDim arrMetaData
strContainer = "cn=<group name>,cn=<container>, "
Set objRootDSE = GetObject("LDAP://RootDSE")
strDNSDomain = objRootDSE.Get("DefaultNamingContext")
Set objGroup = GetObject ("LDAP://"& strContainer & strDNSDomain)
objGroup.getInfoEx array("msDS-ReplValueMetaData"),0
arrMetaData = objGroup.GetEx("msDS-ReplValueMetaData")
' Loop = For Each .... Next
WScript.Echo "Metadata for members of: " & strContainer
For Each strMetaDataEntry in arrMetaData
WScript.echo strMetaDataEntry
Next
Wscript.Quit
Ελπίζω να σας φανεί χρήσιμο!
P.S Το script είναι κλινικά δοκιμασμένο , αλλά δεν αναλαμβάνω ευθύνη!
Φιλικά
SOF
- Read more...
- 0 comments
- 659 views