当前位置:主页 > 查看内容

如何编写一个过滤掉HTML代码的函数?

发布时间:2021-04-22 00:00| 位朋友查看

简介:如何编写一个过滤掉 HTML 代码的函数? % Function Filterhtml(strToFilter) Dim strTemp strTemp = strToFilter While Instr(1,strTemp,"") AND Instr(1, strTemp, "") strTemp = Left(strTemp, Instr(1, strTemp, "")-1) Right(strTemp, Len(strTemp)-Inst……

如何编写一个过滤掉HTML代码的函数?

<%
Function Filterhtml(strToFilter)
  Dim strTemp
  strTemp = strToFilter
  While Instr(1,strTemp,"<") AND Instr(1, strTemp, ">")
    strTemp = Left(strTemp, Instr(1, strTemp, "<")-1) & Right(strTemp, Len(strTemp)-Instr(1,strTemp, ">"))
  WEnd
  Filterhtml = strTemp
End Function
%>

本文转载自网络,原文链接:https://m.jb51.net/article/4674.htm
本站部分内容转载于网络,版权归原作者所有,转载之目的在于传播更多优秀技术内容,如有侵权请联系QQ/微信:153890879删除,谢谢!
上一篇:asp中Scripting.Dictionary字典对象使用示例 下一篇:没有了

推荐图文


随机推荐