No one has voted on any posts yet. Votes from other community members are used to determine a member's reputation amongst their peers.
3 Posted Topics
Try this: [CODE]Dim GroupSearcher As New DirectorySearcher 'Change the OU path, domain and domain admin details Dim GroupSearchRoot As New DirectoryEntry("LDAP://OU=YourGroupsOU,DC=yourdomainname,DC=com", "Your_Domain_Admin", "Admin_Password") With GroupSearcher .SearchRoot = GroupSearchRoot .Filter = "(&(ObjectClass=Group)(CN=YourGroupName))" '<<< Change the Group name here End With Dim Members As Object = GroupSearcher.FindOne.GetDirectoryEntry.Invoke("Members", Nothing) '<<< Get members For …
I've worked on this code [CODE]''' <param name="de">DirectoryEntry to use</param> ''' <param name="pName">Property name to set</param> ''' <param name="pValue">Value of property to set</param> Public Shared Sub SetADProperty(ByVal de As DirectoryEntry, _ ByVal pName As String, ByVal pValue As String) 'First make sure the property value isnt "nothing" If Not pValue …
here is a link for more information...... [url]http://www.techrepublic.com/blog/networking/simplify-admin-tasks-by-exporting-active-directory-data-with-csvde/427[/url] Piyush
The End.
piyush.agrawal