这段asp代码里如何去掉html标签？
<!--#includefile="conn.asp"--><%ztid=request("ztid")ifztid=""thenresponse.write"<scri...
<!--#include file="conn.asp"-->
<%
ztid=request("ztid")
if ztid="" then response.write "<script language=JavaScript>" & chr(13) & "alert('参数错误！');"&"window.location.href = 'index.asp'"&" </script>"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open "Select * FROM news where id="&ztid&"",conn,1,1
%>
<html>
<head>
<title><%=rs("zt")%></title>
上面代码里，运行后显示的标题是带html标签的，例：<font color=#000000>北京欢迎您</font>，我想把标题里的html标签去掉，如何解决呢？知道的高手请教教我，感激不尽！
下面回答的都是垃圾答案！鄙视，蹭分数的！ 展开
<%
ztid=request("ztid")
if ztid="" then response.write "<script language=JavaScript>" & chr(13) & "alert('参数错误！');"&"window.location.href = 'index.asp'"&" </script>"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open "Select * FROM news where id="&ztid&"",conn,1,1
%>
<html>
<head>
<title><%=rs("zt")%></title>
上面代码里，运行后显示的标题是带html标签的，例：<font color=#000000>北京欢迎您</font>，我想把标题里的html标签去掉，如何解决呢？知道的高手请教教我，感激不尽！
下面回答的都是垃圾答案！鄙视，蹭分数的！ 展开
5个回答
展开全部
<%
ztid="<font color=red>北京欢迎您</font>"
Response.write(ztid)
Response.write("<br>")
Response.write("<br>")
Response.write("<br>")
ztid = RemoveHTML(ztid)
Response.write(ztid)%>
<%Function RemoveHTML(strText)
Dim RegEx
Set RegEx = New RegExp
RegEx.Pattern = "<[^>]*>"
RegEx.Global = True
RemoveHTML = RegEx.Replace(strText, "")
End Function%>
我郁闷,我花时间写的代码竟然得到这样的评价.可以说这些代码我发出来都是我经过测试的,至少你说的那些去HTML标签的功能完全能够实现,而且实现的很完美.
楼主你不懂就不要讲话那么难听,看看你自己写的什么东西,前面有if,后面没有end if,明显的语法错误. 前面已经说了ztid为空,后面又代入执行语句,更让人晕了
不愿给分就明说,没人稀罕你那20分,找个你认识会ASP的人问一下我写的东西对不对 你写的话只能证明你的无知
ztid="<font color=red>北京欢迎您</font>"
Response.write(ztid)
Response.write("<br>")
Response.write("<br>")
Response.write("<br>")
ztid = RemoveHTML(ztid)
Response.write(ztid)%>
<%Function RemoveHTML(strText)
Dim RegEx
Set RegEx = New RegExp
RegEx.Pattern = "<[^>]*>"
RegEx.Global = True
RemoveHTML = RegEx.Replace(strText, "")
End Function%>
我郁闷,我花时间写的代码竟然得到这样的评价.可以说这些代码我发出来都是我经过测试的,至少你说的那些去HTML标签的功能完全能够实现,而且实现的很完美.
楼主你不懂就不要讲话那么难听,看看你自己写的什么东西,前面有if,后面没有end if,明显的语法错误. 前面已经说了ztid为空,后面又代入执行语句,更让人晕了
不愿给分就明说,没人稀罕你那20分,找个你认识会ASP的人问一下我写的东西对不对 你写的话只能证明你的无知
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
。。。
吧数据库里记录的标签去掉。。。
或者
str=replace(str,"<font>",chr(0))
str=replace(str,"</font>",chr(0))
如果代码太长，用正则表达式js吧他去掉
楼主你不虚心学就不要乱吠，OK？
吧数据库里记录的标签去掉。。。
或者
str=replace(str,"<font>",chr(0))
str=replace(str,"</font>",chr(0))
如果代码太长，用正则表达式js吧他去掉
楼主你不虚心学就不要乱吠，OK？
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
标签是一直一样的吗？是的话可以这样操作
<% content="&zt&"
content=replace(content,"<font color=#000000>","")
content=replace(content,"</font>","") ‘有规则的话可以继续替换
response.write(""&content&"")
%>
你个傻~~B，你有本事自己弄啊问个毛啊
<% content="&zt&"
content=replace(content,"<font color=#000000>","")
content=replace(content,"</font>","") ‘有规则的话可以继续替换
response.write(""&content&"")
%>
你个傻~~B，你有本事自己弄啊问个毛啊
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
<%
zts=Mid(zt,4,10)
response.Write zts
%>
这个函数可以解决问题！
zts=Mid(zt,4,10)
response.Write zts
%>
这个函数可以解决问题！
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
<!--#include file="conn.asp"-->
<%
ztid=request("ztid")
if ztid="" then response.write "<script language=JavaScript>" & chr(13) & "alert('参数错误！');"&"window.location.href = 'index.asp'"&" </script>"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open "Select * FROM news where id="&ztid&"",conn,1,1
%>
<%=rs("zt")%>
<%
ztid=request("ztid")
if ztid="" then response.write "<script language=JavaScript>" & chr(13) & "alert('参数错误！');"&"window.location.href = 'index.asp'"&" </script>"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open "Select * FROM news where id="&ztid&"",conn,1,1
%>
<%=rs("zt")%>
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
更多回答（3）
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
