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

ttx9n · 发表于 2006-11-16 00: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)-Instr(1,strTemp, ">"))
WEnd
Filterhtml = strTemp
End Function
%>

4k0mp7m · 发表于 2023-7-12 09:59:45

刷屏刷屏刷屏

lba36h7g · 发表于 2023-11-13 02:41:03

天天源码社区论坛

do827261756 · 发表于 2024-1-5 04:40:55

有什么好的服务器

z835648964 · 发表于 2024-3-2 05:07:26

2222222222222222

ppwxcg · 发表于 2024-5-16 01:20:56

的沙发水电费水电费

nwk53kbd · 发表于 2024-6-17 23:52:44

天天源码社区论坛

adm1n · 发表于 2024-7-15 00:06:50

为全额万千瓦

95nd4ba · 发表于 2024-8-10 21:13:32

管灌灌灌灌灌灌灌灌灌灌

平平安安 · 发表于 2024-9-9 23:58:51

天天源码社区。。。。

账号		自动登录	找回密码
密码			立即注册

[编程10000问] 如何编写一个过滤掉HTML代码的函数？

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

相关帖子