Discussion :

[Luffy49]

Voilà j'ai une form qui liste tous les utilisateurs d'un groupe dans une listeview j'ai un bouton supprimez qui doit supprimer du groupe l'utilisateur selectionnez dans la listview mais il me sort une exception avec ce code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 private void button3_Click(object sender, EventArgs e)
        {
            if (listView1.SelectedItems.Count != 0)
            {
                DirectoryEntry ldap_group = new DirectoryEntry("GC://" + cheminldap_groupe, new_conec.login, new_conec.pwd);
                DirectoryEntry ldap_user = new DirectoryEntry("GC://" + cheminldap_user, new_conec.login, new_conec.pwd);
 
                try
                {
                    ldap_group.Invoke("remove", new object[] { cheminldap_user });
                }
                catch (Exception ex)
                {
                    MessageBox.Show(ex.Message);
                }
            }

L'exception est :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Une exception a été levé par la cible d'un appel

[Thomas Lebrun]

ldap_group.SubmitChanges() après le Invoke ?


PS: L'utilisateur est-il connecté au moment où tu veux le supprimer ?

[Luffy49]

Non l'utilisateur n'est pas connecté quand je veus le supprimer

Dans le tuto il mette pas ldap_group.SubmitChanges() ( ce qui ma suppris je dois le dire )

[Thomas Lebrun]

Dans le tuto (http://webman.developpez.com/article...isateurs#L3.3), pour la suppression, il passe par Children.Remove et pas Invoke.....

[Luffy49]

Ba dans le tuto que tu ma filer il passe bien par :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
' Utilisation de la méthode ADSI "Add" pour ajouter un utilisateur à un groupe
                monGroupe.Invoke("Remove", New Object() {monUtilisateur.Path})

[Thomas Lebrun]

Dans le commentaire, il parle de Add et dans la commande, on appelle Remove

Sur le lien: 3.3. Suppression d'objets comptes d'utilisateurs dans l'annuaire

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
 
Public Function deleteUser(ByVal cheminLdapParent As String, _
	                           ByVal cheminLdapObjetAsupprimer As String, _
	                           ByVal monUsername As String, _
	                           ByVal monPassword As String) As Boolean
 
        ' Noeud parent de l'objet à supprimer
        Dim entryParent As New DirectoryServices.DirectoryEntry("LDAP://" & cheminLdapParent, _
		                       monUsername, monPassword, AuthenticationTypes.Secure)
 
        ' Objet à supprimer
        Dim entryAsupprimer As New DirectoryServices.DirectoryEntry("LDAP://" & cheminLdapObjetAsupprimer, _
		                       monUsername, monPassword, AuthenticationTypes.Secure)
 
        Try
 
            ' Suppression de l'objet
            entryParent.Children.Remove(entryAsupprimer)
            Return True
 
        Catch ex As Exception
 
            MessageBox.Show(ex.Message)
            Return False
 
        Finally
 
            ' Fermeture des DirectoryEntry
            entryParent.Close()
            entryAsupprimer.Close()
 
        End Try
 
    End Function