<% 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 %> |
|小黑屋|最新主题|手机版|微赢网络技术论坛 ( 苏ICP备08020429号 )
GMT+8, 2024-9-30 01:31 , Processed in 0.102008 second(s), 12 queries , Gzip On, MemCache On.
Powered by Discuz! X3.5
© 2001-2023 Discuz! Team.