一个带有html代码的字符串,如何截取才能正确显示? 20
最近在写一个博客平台,想在博客列表上显示每个博客正文的前200字,但是如果前200字包含某些html代码,比如<imgsrc="……,而代码的后面部分则在200字后,这样...
最近在写一个博客平台,想在博客列表上显示每个博客正文的前200字,但是如果前200字包含某些html代码,比如<img src="……,而代码的后面部分则在200字后,这样截取以后的代码显示在博客列表上就会产生错误,使博客列表显示变形,如何才能截取这些文本(最好能保留这些图片)而又不影响到列表的显示呢?示例页面是这个:
http://www.apoclast.org
回答很不错可是这样被截取的其他部分也无法正常显示了……期待强人出现 展开
http://www.apoclast.org
回答很不错可是这样被截取的其他部分也无法正常显示了……期待强人出现 展开
1个回答
展开全部
我有一个方法可以去掉任何<>的内容
function NoHTML(str) '去Html语言
dim re
Set re=new RegExp
re.IgnoreCase =true
re.Global=True
'格式化如下
re.Pattern="(\<.[^\<]*\>)" '<***>格式过滤
str=re.replace(str," ")
re.Pattern="(\<.[^\<]*\/\>)" '<***/>格式过滤
str=re.replace(str," ")
re.Pattern="(\<\/[^\<]*\>)" '</***>格式过滤
str=re.replace(str," ")
nohtml=str
set re=nothing
end function
可以去掉全部的HTML语言
希望能给你一点帮助!直接调用RESPONSE.WRITE NOHTML(内容)
function NoHTML(str) '去Html语言
dim re
Set re=new RegExp
re.IgnoreCase =true
re.Global=True
'格式化如下
re.Pattern="(\<.[^\<]*\>)" '<***>格式过滤
str=re.replace(str," ")
re.Pattern="(\<.[^\<]*\/\>)" '<***/>格式过滤
str=re.replace(str," ")
re.Pattern="(\<\/[^\<]*\>)" '</***>格式过滤
str=re.replace(str," ")
nohtml=str
set re=nothing
end function
可以去掉全部的HTML语言
希望能给你一点帮助!直接调用RESPONSE.WRITE NOHTML(内容)
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询