Dim FileObject
Set FileObject=Server.CreateObject("Scripting.FileSystemObject")

'LEGGO IL FILE
Set InStream=FileObject.OpenTextFile(Server.MapPath("/cartella/file.txt"),1,False,False)
Dim linea,contenuto
do while not InStream.AtEndOfStream
linea=InStream.readline()

Response.write linea&"<br>"

loop
InStream.Close
Set InStream=Nothing

Prova ad usare l'adodbstream...

puoi usare un file .bat o.cmd in cui scrivi (non conosco bene la sintassi dos):
percorso/notepad.exe percorso/nomefile.txt

nela pagina fai un link al file.bat

controindicazioni:
-quando un utente clikka sul link visualizza un box "attenzione... etc.etc... apri o salva"
-dovrebbe funzionare solo su windows e, forse il percorso di notepad.exe cambia da s.o. a s.o. (puoi risolvere sniffando il s.o. del client)

se ci sono altri metodi, non li conosco!