<%dim oggettoApriFile, oggettoFileSystem, strPercorso
'percorso fisico del file .txt
strPercorso = "C:\Documents and Settings\Administrator\Desktop\testo\prova.txt"
'istanza dell'oggetto
set oggettoFileSystem = server.CreateObject("Scripting.FileSystemObject")
'apertura
set oggettoApriFile = oggettoFileSystem.OpenTextFile(strPercorso, 1)
'recuperi un numero di caratteri x dalla prima riga... br per passare alla seconda con stesso procedimento
'altrimenti assegni comunque la stringa ad una variabile che andrai ad utilizzare come vuoi
response.write oggettoApriFile.Read(n_caratteri da estrarre dalla prima riga) & "
"
'pulizia
oggettoApriFile.close
set oggettoApriFile = nothing
set oggettoFileSystem = nothing
%>

Se devi passare i dati recuperati e assegnati a variabili, potrai farlo con querystring o campi nascosti....
Se invece vorrai utilizzare un percorso virtuale:
strPercorso = server.mapPath("percorsoFile.txt")

Tutto questo funziona!