Bonjour,
J'ai ce bout de code qui me permet d'écrire dans un fichier
Quand je lance le code, le fichier se rempli bien, mais quand je réalise l'action une nouvelle fois la ligne précédente est remplacée or j'aimerais qu'il m'écrive une nouvelle ligne à la suite de la précédente.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15 Dim Logs as String= "C:\Inetpub\wwwroot\APPZAIN\Log\HistoriqueLogs.txt" Dim Jour as DateTime = DateTime.Now Dim fs1 As IO.FileStream fs1 = New IO.FileStream(Logs, IO.FileMode.OpenOrCreate) fs1.Close() 'fs.Dispose()' Using sw As IO.StreamWriter = New IO.StreamWriter(Logs) '*** Création et inscription du prologue .' sw.WriteLine("") sw.WriteLine(" le mobile "+zeNum.text+" a été inseré à "+Jour) sw.WriteLine("") sw.Close() End Using
Merci bien
Partager