過濾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代碼】相關文章：

網頁滾動文字的制作HTML代碼04-10

數控編程代碼大全02-13

Java代碼的基本知識09-03