这样就可以了,也就是先取100个字,然后再把图面代码),<img替换成<meat那麽图片裏的东西HTML会过滤掉,再输出来就行了
我们知道<meat >裏的东西是看不到的
如果清除所有html代码,replace((replace(left(string,100),"<","<!--"),">","//->")
这样就把所有标签注释掉了,具体问题你要试了才知道,但这绝对是个好思路呵呵
可以自定义一个清除HTML标签的函数。如下所示:<%
function nohtml(str)
dim re
Set re=new RegExp
str=re.replace(str,"<br>","{br}")
re.IgnoreCase =true
re.Global=True
re.Pattern="(\<.[^\<]*\>)"
str=re.replace(str," ")
re.Pattern="(\<\/[^\<]*\>)"
str=re.replace(str," ")
nohtml=re.replace(str,"{br}","<br>")
set re=nothing
end function
%>
除了原有文字和换行符保留外,其他一律过滤掉了
忘了补充一句,比如需要输出没有格式的正文的时候,直接调用该函数即可。如:
response.write nohtml(rs("content"))
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)