Display OU's
Snippet Menu
-7
Thu. Mar. 2nd, 2006 5:30 AM
Display all ou's in an active directory environement
Function DisplayObjects(strADsPath)
set objObject = GetObject(strADsPath)
WScript.Echo strSpace & strADsPath
objObject.Filter = Array("organizationalUnit")
For each objChildObject in objObject
DisplayObjects objChildObject.ADsPath
Next
End Function
Comments
Voting
Votes Up
Votes Down
There are currently no comments for this snippet.