cosi leggo il file txt
ma volendo leggerlo dall'ultima riga in su??
do while not ilfile.AtEndOfStream
counter=counter+1
illine=ilfile.readline
response.write illine
loop
cosi leggo il file txt
ma volendo leggerlo dall'ultima riga in su??
do while not ilfile.AtEndOfStream
counter=counter+1
illine=ilfile.readline
response.write illine
loop
puoi fare in due modio carichi il tutto in un db e poi leggi dal fondo
oopure carichi su un array e anche qui leggi dal fondo
ma con array come posso fare?
in ogni posizione dell'array carichi una riga (dalla prima all'ultima). poi rileggi l'array (dall'ultima posizione alla prima). that easy!
mi puoi fare un esempio di come crearlo dato che non conosco il numero di righe che compongono il txt??
non c'è bisogno di conoscere in anticipo il numero di righe. ad ogni riga letta incrementi un contatore di 1 e con questo contatore effettui una Redim dell'array.
in alternativa puoi fare una prima lettura del file per contare le righe, fai la Dim dell'array e rileggi il file per caricare l'array.
a te la scelta
ho contato le righe come hai detto, poi ho creato l'array cosi:
Set file = CreateObject("Scripting.FileSystemObject")
Set ilfile = file.OpenTextFile(ilfile, 1, False)
righe=0
do while not ilfile.AtEndOfStream
righe=righe+1
illine=ilfile.readline
loop
dim testo(righe)
ma mi da questo errore:
Prevista costante Integer
/ line 60, column 10
dim testo(righe)
prova con
ReDim testo(righe)
dim testo(4)
ReDim testo(righe)
ma mi da questo errore:
Questa matrice è fissa o temporaneamente bloccata
usa solo la redim
Permessi di invio
Rispondi quotando