<%
function replacestr(str) 
replacestr=replace(str,"<","<") '先获得str的值替换，再赋给replacestr 
replacestr=replace(replacestr,">",">") '替换replacestr内容 
replacestr=replace(replacestr,"&","&") '同上 
replacestr=replace(replacestr,chr(32),"&nbsp;") 
replacestr=replace(replacestr,vbcrlf,"<br>") 
end function
%>
