<% Set FS = Server.CreateObject("Scripting.FileSystemObject") Set RS = FS.OpenTextFile(Server.MapPath("/text/TextFile.txt"),1) While not rs.AtEndOfStream Response.Write RS.ReadLine Response.Write("") Wend %>
效果会显示在右边 Create by 软晨网(RuanChen.com)