listbox vers fichier txt et inversement

Question

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 ?

frvfrvfrvfrv · Answer

oups, 
j'oublier , je suis en vb2005 express

merci

cs_EBArtSoft · Answer

C'est pas le WriteAllLine qui plante c'est le AddRange

E.B.

avengerfrance · Answer

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)

KIPRE74 · Answer

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

heartamon · Answer

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.

Listbox vers fichier txt et inversement

5 réponses

Votre réponse

Discussions similaires