empty text file

[anallie0]

hi
I have to save a set of values ​​and use the following code:

Sub scrivireport

If File.ExternalWritable Then

    Dim TextWriter1 As TextWriter
       TextWriter1.Initialize(File.OpenOutput(File.DirDefaultExternal & "/TriageDir", "Report.txt", True))    
         TextWriter1.WriteLine(Colore)
         TextWriter1.WriteLine(Numpaz)
         TextWriter1.WriteLine(Valcrono)
         TextWriter1.WriteLine(Lati)
         TextWriter1.WriteLine(Longi)
         TextWriter1.WriteLine("---")
         
   TextWriter1.close
End If
      

End Sub

when I go to read the file created, it is empty.

What's wrong?

 

[Erel]

Are you sure that you are reading the correct file? Your code looks correct.

 

[anallie0]

Resolved. mea culpa :sign0013:
Using the file from another part of the code resetting values​​.

A question:

if I open a file with the Append = False, the contents of the file is deleted?

 

[Erel]

if I open a file with the Append = False, the contents of the file is deleted?

Yes.

 

[anallie0]

Yes.

thanks Erel :signOops: