asp 去除字段内的 html代码并截取只显示前100个字符

我要调用一个字段的内容,但是要去除里面的html代码,我用下面的方式哪里错了,服务器提示错误:... 我要调用一个字段的内容,但是要去除里面的html代码,我用下面的方式哪里错了,服务器提示错误: 展开
 我来答
weio33
2012-07-15 · TA获得超过941个赞
知道小有建树答主
回答量:1147
采纳率:66%
帮助的人:535万
展开全部
你没把代码发完整啊,提示错误也没有说是什么错误?

这个正则没有问题,我怀疑是你前面的错误,如果前面的变量没有,你调用就是错的
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
第19次忏悔
2012-07-13 · 超过126用户采纳过TA的回答
知道小有建树答主
回答量:344
采纳率:0%
帮助的人:259万
展开全部
哎....

1. 把这段代码领存为一个文件,比如叫a.asp放在和你这个页面的同一级目录下

<%
'去除html标记
Function nohtml(str)
dim re
Set re=new RegExp
re.IgnoreCase =true
re.Global=True
re.Pattern="<[^<>]*>"
str=re.replace(str,"")
nohtml=str
End Function
Function gotTopic(str,strlen)
if str="" then
gotTopic=""
exit function
end if
dim l,t,c, i
str=replace(replace(replace(replace(str," "," "),""",chr(34)),">",">"),"<","<")
l=len(str)
t=0
for i=1 to l
c=Abs(Asc(Mid(str,i,1)))
if c>255 then
t=t+2
else
t=t+1
end if
if t>=strlen then exit for
next
if i < l then
gotTopic=left(str,i) & "..."
else
gotTopic=str
end if
'gotTopic=replace(replace(replace(replace(gotTopic," "," "),chr(34),"""),">",">"),"<","<")
End Function
%>

2. 然后你的这个显示页面包含一这个文件
<!--#include file="a.asp"-->
3. 再然后
把你页面上的<%function ....%>删了
本回答被网友采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式