ciao a tutti, mi sto cimentando nel leggrere un file di testo da salvare in una variabile riga per riga
es:
il file txt
prova
prova1
prova2
prova3
la variabile
leggi(1)=prova
leggi(2)=prova1
leggi(3)=prova2
leggi(4)=prova3
qualche aiuto
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