教程之家 TIY Editor
教程之家
改变方向
暗黑模式
<html> <body> <p>这是文本文件中的所有行（带有行号）：</p> <% Set fs=Server.CreateObject("Scripting.FileSystemObject") Set f=fs.OpenTextFile(Server.MapPath("testread.txt"), 1) do while f.AtEndOfStream = false Response.Write("Line:" & f.Line & " ") Response.Write(f.ReadLine) Response.Write("<br />") loop f.Close Set f=Nothing Set fs=Nothing %> </body> </html>