ASP中读取test.TXT文件的内容，再将内容显示在网页上，代码见下面。
问题：当test.TXT文件的内容包含ASP或HTML代码时，如”<%pesponse.write("想原样输出，可不行！")%>“，则该内容根本不输出。

如何控制将TXT文件中的任何内容照原样输出？

'代码开始-----------------------------------------------
<%
''''''函数说明：函数RPBR的作用是将字符串中的回车即CHR（13）转换成HTML中的换行<BR>
function RPBR(byVal Mystr)
    RPBR=replace(Mystr,Chr(13),"<Br>")
end function
%>
<%
set fs=server.CreateObject("scripting.filesystemObject")
if fs.fileExists(server.mapPath("test.TXT")) then
    set ts=fs.OpenTextfile(server.mapPath("test.TXT"))
    mystr=rpbr(ts.readall())
    response.write(mystr)
else
    response.write("文件test.txt文件不存在！")
end if

%>

如何才能将上面的文本文件原样输出啊？

本论坛中输入的ASP代码就是原样输出的，它是如何实现的？请高手指点一下！
谢谢啦~

<%
''''''函数说明：函数RPBR的作用是将字符串中的回车即CHR（13）转换成HTML中的换行<BR>
function RPBR(byVal Mystr)

RPBR= Replace(Mystr, "<","&lt;")
RPBR = Replace(RPBR, ">","&gt;")
RPBR=replace(RPBR,Chr(13),"<Br>")
end function
%>