French Sauvegarde de données

[JJM]

Bonsoir,

Comment dois-je faire pour ajouter des données texte à un fichier sauvegardé précedement?

Dim fb As OutputStream
s=ET4.Text.ToLowerCase.Trim
If s = "retrait" Then ET6.Text =ET6.Text + NbEuros
fb=File.OpenOutput(DirSauv,"ListeFrais.csv",True)
File.WriteString(fb,ET6.Text)

J'obtiens une erreur.
Que dois-je faire?
Merci
JJM

 

[JJM]

Bonsoir,

J'ai trouvé la réponse à ma question:

dim f1 as TextWriter
ligne=....
f1.Initialize (File.OpenOutput (DirSauv,"ListeFrais.csv",True))
f1.WriteLine (ligne)
f1.Close

Bonne soirée

JJM