如何编写一个过滤掉HTML代码的函数?
摘要:如何编写一个过滤掉HTML代码的函数?
如何编写一个过滤掉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
%>
【如何编写一个过滤掉HTML代码的函数?】相关文章:
上一篇:
如何将访问者数目周期性地保存?
下一篇:
如何创建一个PDF文件?