Italian LEGGERE FILE DI TESTO

Dim varprova As List
Dim var1 As String
Dim var2 As String
Dim var3 As String
dim FileDir as String

FileDir = File.DirRootExternal & "/download"

varprova.Initialize
If File.Exists(FileDir,"prova.txt") Then
    varprova =  File.ReadList(FileDir, "prova.txt")  
    var1=varprova.Get(0)
    var2=varprova.Get(1)
    var3=varprova.Get(2)
    Log(var1 &".. "& var2 &".. "&var3)  
Else
    varprova.Add("prova1")
    varprova.Add("prova2")  
    varprova.Add("prova3")  
    File.WriteList(FileDir,"prova.txt",varprova)
End If
Return

Dim f as string
f = Regex.Split(Chr(13), File.ReadString(pathFile , "INFO.txt"))(0)

Dim Lista as List
Lista.Initialize
Lista.Clear
Dim I as Int
Dim Reader As TextReader
Reader.Initialize(File.OpenInput("cartella", "NomeFile.txt"))
Dim LEGGO As String
LEGGO = Reader.ReadLine
  Do While LEGGO <> Null
       I=I+1
       Lista.Add (LEGGO)
       LOG("Riga " & I & "= " & LEGGO
       LEGGO = Reader.ReadLine
  Loop
Reader.Close
File.Delete("cartella","NomeFile.txt"):'cancella il file
' per CARTELLA intendo File.DirRootExternal o simile