lettura da txt e scrittura in db

[nextart]

ciao a tutti chiedo informazioni in merito all'oggetto.
Ho un file di log in questo formato:

prime 4 righe (che non sono da leggere)
#
#
#
#
01:49:18 10.144.24.250 [35117]USER d0000v09 331
01:49:18 10.144.24.250 [35117]PASS - 230
01:49:19 10.144.24.250 [35117]sent /figaroroot/d0000v09/recenti.htm 226
01:49:21 10.144.24.250 [35117]created ARC15.tmp 226
01:49:23 10.144.24.250 [35117]created log/20050829034918.log 226
01:49:23 10.144.24.250 [35117]QUIT - 226

i campi su cui fare i controlli sono quelli evidenziati.
A parole:
leggi la riga memorizza l'indirizzo l'ora e l'ip e l'utente (USER d0000v09) poi controlla le righe sotto, fino a dove trovi lo stesso indirizzo ip con la scritta QUIT, se la trovi salva:
ora_uscita

vorrei leggere dal file le info in blu e nel db inserire:
ora_login - ip - user - ora_uscita

il tutto per poter sapere gli utenti connessi ad un sito ftp via web .
Prima c'era una dll (ism.dll)che faceva tutto cio' ma da IIS5 in poi non c'e' piu' e non sono riuscito a trovare l'alternativa.....

l'istruzione era questa:
//localhost/scripts/iisadmin/ism.dll?ftp/conn

grazie a tutti.....

[Mems]

Questo caso è unico nel file di log o può ripetersi per più utenti e con più righe di operazioni svolte prima del QUIT?
Postaci un log più completo.

[nextart]

puo' ripetersi.....e con piu' righe prima del Quit

log.txt


eccolo.

grazie.....

[optime]

con fso apri il file e lo scorri
quando trovi "]USER" e' una apertura di sessione (da cui leggi data e ora di apertura, e username)
quando trovi "]QUIT" e' una chiusura di sessione (leggi data e ora di chiusura)
al quit scrivi la tabella.

IMHO, piu' facile a farsi che a dirsi

[nextart]

a parole ......... appunto....
tradotto?

[optime]

Originariamente inviato da nextart
a parole ......... appunto....
tradotto?

tradotto=scrivimi il codice asp?

[nextart]

noooooooooooooo...non voglio lo script pronto, ci mancherebbe...
solo che la lettura di un file di testo e' ok, ma come posso controllare quando trova USER ecc....
es
<%
Set fs=Server.CreateObject("Scripting.FileSystemObject ")

Set f=fs.OpenTextFile(Server.MapPath("testo.txt"), 1)
//ES: mi legge i primi 14 caratteri
//Response.Write(f.Read(14))
//devo usare ReadAll per il mio caso??
f.Close

Set f=Nothing
Set fs=Nothing
%>

....

[Mems]

if inStr(riga,"]QUIT") > 0 then