Visualizzare file txt in formato html

Come visualizzare il contenuto di un file txt in formato html.

Basta impostare il percorso del file ed il suo nome. Con la proprietà ReadLine si legge riga per riga il file txt e si mostra a video il contenuto.

<%
mypath="/"
testo1="file.txt"

Set Fso=CreateObject("Scripting.FileSystemObject") 
path=Server.MapPath(mypath & testo1)
If (fso.FileExists(path)) Then
   Set a=fso.OpenTextFile(path)
   Do while not a.AtEndOfStream
      b=a.ReadLine
      Mypos=Instr (b, " ")
      response.write("<small>")
      response.write b
      response.write "</small><br>"
   Loop
   a.Close
End If %> 

van basten, senna, freeware, risorse per webmaster, scarica, incidenti, pele, comici, formula1, javascript, radio, meteo, filmato, programmare, shumacher, video, visual basic, foto, sorpassi, free