如何編寫一個(gè)過濾掉HTML代碼的函數(shù)？
更新時(shí)間：2006年11月16日 00:00:00 作者：
如何編寫一個(gè)過濾掉HTML代碼的函數(shù)？
<%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
%>
相關(guān)文章
如何驗(yàn)證IP地址？...2006-11-11
如何讀取文本文件的內(nèi)容？...2006-11-11
如何使用表單發(fā)送電子郵件？...2006-11-11
如何做一個(gè)隨機(jī)密碼產(chǎn)生器？...2006-11-11
如何把中文轉(zhuǎn)換為UNICODE？...2006-11-11
如何做一個(gè)只搜索本網(wǎng)站的引擎？...2006-11-11
如何制作一個(gè)彈出式的調(diào)查窗口？...2006-11-11
如何用Cookie進(jìn)行登錄驗(yàn)證？...2006-11-11
如何最準(zhǔn)確地統(tǒng)計(jì)在線用戶數(shù)？
如何最準(zhǔn)確地統(tǒng)計(jì)在線用戶數(shù)？...2006-11-11
如何實(shí)現(xiàn)某些頁面只讓特定的用戶瀏覽？...2006-11-11