如何编写一个过滤掉HTML代码的函数?
如何编写一个过滤掉HTML代码的函数?<%Function Filterhtml(strToFilter) Dim strTemp strTemp = strToFilter While Instr(1,strTemp,"<") AND Instr(1, strTemp, ">") strTemp = Left(strTemp, Instr(1, strTemp, "<")-1) & Rig...
如何编写一个过滤掉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
%>
很赞哦!()
- 上一篇
asp中在JScript中使用RecordSet对象的GetRows
asp中在JScript中使用RecordSet对象的GetRows
- 下一篇
浅析Java、C/C++、JavaScript、PHP、Python分别用来开发什么?
如何编写一个过滤掉HTML代码的函数?<%Function Filterhtml(strToFilter) Dim strTemp strTemp = strToFilter While Instr(1,strTemp,"<") AND Instr(1, strTemp, ">") strTemp = Left(strTemp, Instr(1, strTemp, "<")-1) & Rig...
大图广告(830*140)