rescueswimmer
MIS
How can you determine the accurate distinguished name of and AD object? I'm using a script to modify an group but it's saying there is no such object on the server...code:80072030
Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
'This script accompanies the book Windows Management Instrumentation
'by Matthew Lavy and Ashley Meggitt (New Riders, 2001)
'The code is copyright 2001, Matthew Lavy & Ashley Meggitt
'You are free to use and modify the script at will
'provided you understand that all code here is made available AS IS, with
'NO WARRANTY WHATSOEVER. The authors take NO RESPONSIBILITY AT ALL for
'problems that result from the use of this script or any part thereof
'allcommonnamesagain.vbs - display the names of all
'users in an Active Directory, using WMI
Option Explicit
Dim refWMI
Dim colEveryone
Dim refUser
set refWMI = GetObject("winMgmts:root\directory\LDAP")
set colEveryone = refWMI.ExecQuery("SELECT * FROM DS_User")
For Each refUser in colEveryone
WScript.Echo refUser.DS_distinguishedName
Next
Set colEveryone = Nothing
Set refWMI = Nothing