Discussion :

[djdjo59]

Salut
je voudrais supprimer plusieurs items sélectionnés dans ma listbox
voici le code de sélection:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Dim select_index As Integer
        select_index = ListReserves.SelectedIndex.ToString()
 
        'si l'index 0 est sélectionné, tout le listbox est sélectionné'
        If select_index = select_index Then
            ListReserves.SelectionMode = SelectionMode.MultiSimple
 
            'Dim setpe As Integer
            Dim boucle As Integer
            For boucle = 0 To 4
                ListReserves.SelectedIndex = select_index + boucle
 
            Next boucle
        End If

donc si je clique sur un item il me sélectionne les 3 items qui suivent

ce que je voudrais c'est que lorsque je clique sur supprimer, il me supprime les 4 d'un cou de mon fichier journal.txt,
ce code

Code :

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

1
2
3
4
5
 
FileOpen(1, "c:\journal.txt", OpenMode.Append, OpenAccess.ReadWrite)
ListReserves.SelectedItems.Remove(ListReserves.SelectedItems)
 
fileclose(1)

ne me les supprime qu'un par un de ma listbox et pas de mon fichier (je ne sais pas comment faire pour le fichier)
si quelqu'un pouvait m'aider pour la suppression rien que de la listbox ça serait super

merci !

[spamitovic]

Salut,

Beh à ma connaissance il n'y a pas de solution, il faut faire un StreamReader qui lit ton fichier texte puis ajoute le nouveau contenu dans un fichier temporaire avec un streamwriter et enfin remplace l'ancien fichier avec ton nouveau fichier temporaire...

Tu peux aussi vider le contenu de ton fichier avec un Remove et le remplir avec le nouveau contenu.

J'espère que j'étais clair