Ciao a tutti, il problema è il seguente: ho un file di testo con all'interno varie rige, io vorrei poter leggere soltanto l'ultima....
Ho trovato la funzione LOF() la quale, se ho ben capito, dovrebbe restituire la dimensione del file (quindi da quante riga è composto?)
Ho quindi assegnato ad una variabile long il risultato di LOF(), che è un numero tipo: 112546...
Ora, non sapendo come leggere solo l'ultima riga, ho impostato un ciclo while che legge il file fino all' EOF().
Ho impostato una variabile "c" come integer è gli ho detto di incrementare il valore di c ad ogni riga letta.
Gli ho poi detto che quando c = LOF() -1 scrivi la riga...ma non restituisce nulla...
Ecco il mio codice:
mypair = Open User.Home &/ "ChartArtist" &/ cross & ".csv" For Read
While Not Eof(mypair)
l = Lof(mypair)
Line Input #mypair, pair
If c < (l - 1) Then
slice = Split(pair, ";")
For Each spl In slice
GridView1[i, a].Text = spl
If a < 7 Then
a = a + 1
Endif
Next
Endif
La riga va spezzettata ed inserita in un gridview....