Utilisation de StreamWriter

Bonjour,

J'ai un problème d'utilisation de StreamWriter pour ajouter des données dans un fichier texte. dans le code suivant les données que j'insert écrasent les données déjà présentes alors que je voudrais les ajouter aux données déjà existantes.

Merci pour votre aide !

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click   Label1.Text = TextBox1.Text   zone = TextBox1.Text   Dim path As String = "\FICHIER.TXT" Using sw As New StreamWriter(path, True) sw.AutoFlush = False sw.WriteLine(zone) sw.Close() End Using   End Sub

---

Bizarre, le booléen est censé bien indiquer que l'on passe en mode Append. Par contre, cela ne fonctionne que si le fichier existe déjà.

Sinon tu peux faire comme ceci :

Code:

---

1 2 3 4 5 6

Using fs as new FileStream("\FICHIER.TXT",FileMode.Append, FileAccess.Write)) Using sw as new StreamWriter(fs)) sw.WriteLine(zone) End Using End Using

---

Penser à bien fermer les flux après leurs utilisations :)

Merci

Mais pas mieux !

Précision qui n'est peut être pas négligeable l'environement est WindowsCE.

"\FICHIER.TXT" .. Essaie avec "C:\Test.txt" pour voir.

Il n'est pas possible de préciser un volume car il n'éxiste pas de disk C:

Il n'éxiste qu'un environnement "Mon Pocket PC" qui est le volume de stockage.

Le fichier FICHIER.TXT se crée dans Mon Pocket PC\FICHIER.TXT

System.IO.File.AppendText

Merci pour vos réponses.
Tout fonctionnait bien. Grosse erreur de ma part je testais sur un émulateur de Pocket Pc qui à chaque démarrage réinitialisait son disque virtuel !