Listbox vers fichier txt et inversement

Messages postés
108
Date d'inscription
lundi 21 novembre 2005
Statut
Membre
Dernière intervention
30 avril 2008
- - Dernière réponse : heartamon
Messages postés
2
Date d'inscription
jeudi 7 janvier 2010
Statut
Membre
Dernière intervention
17 mars 2010
- 17 mars 2010 à 16:47
salut à tous les vbophone,

je souhaiterai charger une listbox avec un fichier texte (txt)

et aussi de sauvegarder ma listbox dans un txt.

pour charger j'ai ceci :

ListBox1.Items.AddRange(System.IO.File.ReadAllLines("c:\list.txt"))

ca marche nikel

pour la sauvegarde ?????

j'ai essayer ceci :

ListBox1.Items.AddRange(System.IO.File.WriteAllLines("c:\list.txt"))

mais ca marche pas !

Quelqu'un à la soluce ?
Afficher la suite 

5 réponses

Messages postés
108
Date d'inscription
lundi 21 novembre 2005
Statut
Membre
Dernière intervention
30 avril 2008
0
Merci
oups,
j'oublier , je suis en vb2005 express

merci
Commenter la réponse de frvfrvfrvfrv
Messages postés
4531
Date d'inscription
dimanche 29 septembre 2002
Statut
Modérateur
Dernière intervention
22 avril 2019
5
0
Merci
C'est pas le WriteAllLine qui plante c'est le AddRange

E.B.
Commenter la réponse de cs_EBArtSoft
Messages postés
10
Date d'inscription
mercredi 17 septembre 2003
Statut
Membre
Dernière intervention
26 janvier 2010
0
Merci
Slt,
je pense que en décomposant en une petite étape suplementaire , cela devrait fonctionner :

        Dim ligne(ListBox1.Items.Count) As String
        ListBox1.Items.CopyTo(ligne, 0)
        System.IO.File.WriteAllLines("c:\list.txt", ligne)
Commenter la réponse de avengerfrance
Messages postés
121
Date d'inscription
jeudi 15 mai 2008
Statut
Membre
Dernière intervention
21 novembre 2013
0
Merci
Salut voici ce que j'ai fait pour charger des fichiers dans mon ListBox
Ajouter un bouton OpenFiledialog à ton aplli,
sur ta form mettre un TextBox et 2 bouton (1 bouton pour parcourir ton repertoire et un bouton pour charger)
voici les code pour les différents boutons :

'bouton parcourt le répertoire

Private Sub btnBrowse_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnBrowse.Click
OpenFileDialog1.ShowDialog()
txtFilename.Text = OpenFileDialog1.FileName

End Sub
----------------------------------
'bouton chargement
Private Sub btnLoad_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnLoad.Click

If txtFilename.Text <> "" Then


Try
lstListEsp.Items.Clear() 'Erase last list
' Create an instance of StreamReader to read from a file.
Using sr As StreamReader = New StreamReader(txtFilename.Text)
Dim line As String
' Read and display the lines from the file until the end
' of the file is reached.
Do

line = sr.ReadLine()
lstListEsp.Items.Add(line.ToString())

Loop Until line Is Nothing
sr.Close()
End Using
Catch Excep As Exception
' Let the user know what went wrong.
Console.WriteLine("The file could not be read:")
Console.WriteLine(Excep.Message)
End Try
End If

End Sub

'voire les repertoire
Private Sub txtFilename_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles txtFilename.TextChanged

@+

End Sub
Commenter la réponse de KIPRE74
Messages postés
2
Date d'inscription
jeudi 7 janvier 2010
Statut
Membre
Dernière intervention
17 mars 2010
0
Merci
salut KIPRE74, ton code est bon mais je voudrais savoir ce que tu as fais de la déclaration de "txtfilename" et de celle de " lstListEsp", j'arrive pas à faire marcher le code sans la déclaration bien sûr.
désolé je ne suis qu'un débutant j'aimerais bien avoir une réponse rapide et merci.
Commenter la réponse de heartamon