福州北路127号:请问怎么过滤掉ASP留言本里的空格/回车?

来源:百度文库 编辑:杭州交通信息网 时间:2024/04/29 14:43:41
请问怎么过滤掉ASP留言本里的空格/回车?

就是提交留言后在主页显示出来不出空格/回车的效果而是 "<BR>"....等

请问怎么解决!~要最详细,不要只说调用什么函数....要详细详细详细!谢谢啦!

原因:
没有进行HTML转换,比如<br>  等字符就被直接读取而非解析。
解决方法:
在留言读取页面上加上这个函数。
<%
function HTMLEncode(fString)
if not isnull(fString) then
fString = replace(fString, ">", ">")
fString = replace(fString, "<", "<")
fString = replace(fString, """", """)
fString = Replace(fString, CHR(32), " ")
fString = Replace(fString, CHR(9), " ")
fString = Replace(fString, CHR(34), """)
fString = Replace(fString, CHR(39), "'")
fString = Replace(fString, CHR(13), "")
fString = Replace(fString, CHR(10) & CHR(10), "</P><P> ")
fString = Replace(fString, CHR(10), "<BR>")
fString=ChkBadWords(fString)
HTMLEncode = fString
end if
end function
%>
然后原来的比如说a=rs.b
就要改成a=HTMLEncode(rs.b),这个时候原来<br>就被解析成回车了。

你是将留言存储在那里?如果存储在数据库不会出现上面的问题。另外,如果你打的是<br>,就没有问题,如果你打的是< >就出问题了。

比如你的留言都保存在 abc 变量里面。

在写入数据库之前,把abc这样处理一下:

function WW_text(mycon)
yourcontent=mycon
yourcontent=replace(yourcontent,"<","<")
yourcontent=replace(yourcontent,">",">")
yourcontent=replace(yourcontent,vbcrlf,"<br>")
ww_text=yourcontent
end function

abc=WW_text(abc)