Discussion :

[petchy]

bonjour,
dans ma form j'ai une listview,mais je n'arrive pas à faire plusieurs sélection des items pourtant j'ai la propriété Multisélect à true, y a t'il un code pour pouvoir sélectionné plusieurs Items ?

merci
cordialement

[l_autodidacte]

Touche Ctrl enfoncée + Clic sur les éléments à sélectionner

[petchy]

super,merci
mais j'ai un autre petit soucis,j'ai ce code pour supprimer un items de ma base et ça fonctionne, mais quand je sélectionne plusieurs items ça ne fonctionne pas, auriez vous une idée ?

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
 Dim res
    If Codepsa <> 0 Then
        res = MsgBox("Etes-vous sur de vouloir supprimer  " _
                     & vbCrLf & vbCrLf & vbTab & Text1.Text & "  ?", vbYesNo, "Supprimer la fiche de l'enfant !!")
        If res = 6 Then
            Set RS = New ADODB.Recordset
            RS.Open "Delete * from centre_aéré where Num_ctr=" & Codepsa, Db, adOpenDynamic, adLockOptimistic
            Call iniliste(1)
            Call Rafresh("SELECT nomenfant_ctr, prenomenfant_ctr, pere_ctr, mere_ctr, commune_ctr, caf_ctr, Num_ctr FROM centre_aéré ORDER BY nomenfant_ctr")
 
        End If
        'Frm_Accueil.Hide
        'Frm_Accueil.Show
    Else
        MsgBox "Selectionnez un Enfant !!", vbCritical, "Supression !!"
    End If

merci

[l_autodidacte]

L'idée consiste à parcourir la liste du bas vers le haut et :
1 - Déterminer l'index du dernier élément sélectionné
2 - Supprimer cet élément en l'écrasant par celui qui vient juste après lui.
3 - Décaler d'une unité vers le haut tous ceux qui viennent après l'élément supposé être supprimé(en fait remplacé)
4 - Supprimer le dernier élément de la liste une fois copié vers le haut. (La propriété ListCount diminue de 1)

5 - Reprendre les étapes de 1 à 4 pour le premier élément sélectionné rencontré (toujours en parcourant la liste du bas vers le haut) qui est au-dessus de celui qu'on vient de supprimer.
Appliquer la méthode pour tous les autres éléments à supprimer

[petchy]

bonjour,
désolé pour le retard.
Mais je ne comprends pas,aurez tu un exemple de code

merci
cordialement

[l_autodidacte]

L'idée invoquée peut être retrouvée dans cette Contribution notamment dans la procédure(Sub cmdDelSelection_Click).
A toi d'adapter et faire de sorte que chaque entrée sélectionnée(cochée) dans la ListView soit supprimée dans la BD(selon bien sûr un critère choisi)