首页 > 学院 > 编程设计 > 正文

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

2020-06-19 13:52:35

字体：大中小

来源：转载

供稿：网友

如何编写一个过滤掉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
%>

上一篇：如何编写一个创建FTP站点的函数？

下一篇：如何将访问者数目周期性地保存？

学习交流

系统运行缓慢的解决思路

系统运行缓慢的解决思路...

热门图片

猜你喜欢的新闻

猜你喜欢的关注

新闻热点

字节跳动公司一季度营收约为400亿元人民币同比增长130%

2020-06-17 22:25:48

新浪微博：6月12日22时起用户发布评论须关注博主7天以上

2020-06-13 23:26:17

中国联通宣布公用电话全面停止服务：IC卡、校园卡再见！

2020-06-12 23:14:25

对话张朝阳：我已经直播很多年了，每天都教英语

2020-06-12 23:10:32

人人App疑遭全网下架：已无法搜索到该应用

2020-06-12 23:07:24

王健林电商梦破灭！飞凡宣告注销万达退出电商业务

2020-06-10 13:37:38

疑难解答

图片精选

网友关注