asp fso顯示文本文件的所有內容

ASP利用fso來顯示文本文件的所有內容的代碼。注：1.txt為當前目錄下的文本文件，如果要顯示其他文本文件，需要更換地址。
<%
Set MyFileObject=Server.CreateObject("Scripting.FileSystemObject")
path=server.mappath("1.txt")
Set MyTextFile=MyFileObject.OpenTextFile(path)
While NOT MyTextFile.AtEndOfLine
Response.Write(MyTextFile.Readline)&#38;"<br>"
WEND
MyTextFile.Close
%>