Question Remove user from AD within vb.net?

sebasjuh · #1 (**permalink**) 10-23-2008, 11:35 AM

Hello,

I have a small question!
Is it possible to remove a user from a Active Directory group within Visual Basic 2005?

I'm making a tool to get all the groups and users, so I already have to group name and the username. Now I only want a button to remove the selected user from the selected group but how can I get that?

Can someone help me with this maybe???

Sebas

MattP · #2 (**permalink**) 10-23-2008, 12:47 PM

Pretty comprehensive tutorial on Active Directory here.

CodeProject: Working with Active Directory in VB.NET. Free source code and programming help

sebasjuh · #3 (**permalink**) 10-24-2008, 6:53 AM

Thank you MattP for your reply.
I already found that website but when I use that code for deleting a user from a group I got this error:

Quote:

Name 'GetDirectoryObject' is not declared.

I don't know how to fix this....

Edit: This is the code btw:

Code:

Public Shared Sub RemoveUserFromGroup(ByVal UserName As String, _
                  ByVal GroupName As String)

    Dim Domain As New String("")
    
    'get reference to group
    Domain = "/CN=" + GroupName + ",CN=Users," + GetLDAPDomain()
    Dim oGroup As DirectoryEntry = GetDirectoryObject(Domain)
    
    'get reference to user
    Domain = "/CN=" + UserName + ",CN=Users," + GetLDAPDomain()
    Dim oUser As DirectoryEntry = GetDirectoryObject(Domain)
    
    'Add the user to the group via the invoke method
    oGroup.Invoke("Remove", New Object() {oUser.Path.ToString()})
    
    oGroup.Close()
    oUser.Close()
End Sub

danmrf · #4 (**permalink**) 09-21-2009, 7:32 AM

If you have allready connected to the user using directoryentry, you can get the distinguished name of the user.

dim userdn as string = %userDE%.properties("distinguishedname").value

or by removing the "LDAP://" from the users path.
dim userdn as string = %userDE%.path.remove(0,7)

then you have to open the group using directoryentry

dim groupde as new directoryentry(%your LDAP to the group%)
groupde.properties("member").remove(userdn)
groupde.commitchanges
groupde.close

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

Currently Active Users Viewing This Thread: 1 (0 members and 1 guests)