leggere ultime righe di un file di testo

[Ufotizio]

Ciao a tutti!

è possibile leggere direttamente le ultime linee di un file di testo? ne ho bisogno perche ho un file di testo di 7mb (database utenti) e devo leggere le ultime 100 righe

ho trovato questo script che lo legge

<%
ilfile=server.mappath("file.txt")
Set file = CreateObject("Scripting.FileSystemObject")
Set ilfile = file.OpenTextFile(ilfile, 1, False)
counter=0
do while not ilfile.AtEndOfStream
counter=counter+1
illine=ilfile.readline
response.write illine & "
"
loop
ilfile.Close
set ilfile=nothing
set file=nothing
%>

aspetto un vostro consiglio. Grazie!

[optime]

i file di testo sono sequenziali - e come dice il nome, vanno letti in sequenza... potresti provare a leggerlo tutto in un botto (ReadAll) e poi splittarlo per VbCrLf...

[Ufotizio]

allora potrei decidere di stamparmi quello che vedo da un determinato punto? ogni riga del file di testo comincia con un numero che corrisponde all'id dell'utente

adesso provo a splittarlo come dici tu, se puoi darmi qualche consiglio su come fare ti ringrazio

[Ufotizio]

ottimo ci sono riuscito!

<%
ilfile=server.mappath("file.txt")
Set file = CreateObject("Scripting.FileSystemObject")
Set ilfile = file.OpenTextFile(ilfile, 1, False)
stringa = ilfile.ReadAll
split_stringa = split(stringa,"227236")
stringa_ultimi = replace(split_stringa(1),vbcrlf,"
")
ilfile.Close
set ilfile=nothing
set file=nothing
response.write("227236"&stringa_ultimi)
%>

grazie per il consiglio!

[optime]

optime!