NEWSZW_HZH_BEGIN-->
如何编写一个过滤掉 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
%>
NEWSZW_HZH_END-->
查看更多关于如何编写一个过滤掉HTML代码的函数？_编程10000问的详细内容...
声明：本文来自网络，不代表【好得很程序员自学网】立场，转载请注明出处：http://haodehen.cn/did27442