ScriptHtml 函數(shù)之過濾html標(biāo)記的asp代碼
更新時間：2007年09月01日 22:13:16 作者：
'==================================================
'函數(shù)名：ScriptHtml
'作 用：過濾html標(biāo)記
'參 數(shù)：ConStr ------ 要過濾的字符串
'==================================================
Function ScriptHtml(Byval ConStr,TagName,FType)
Dim Re
Set Re=new RegExp
Re.IgnoreCase =true
Re.Global=True
Select Case FType
Case 1
Re.Pattern="<" & TagName & "([^>])*>"
ConStr=Re.Replace(ConStr,"")
Case 2
Re.Pattern="<" & TagName & "([^>])*>.*?</" & TagName & "([^>])*>"
ConStr=Re.Replace(ConStr,"")
Case 3
Re.Pattern="<" & TagName & "([^>])*>"
ConStr=Re.Replace(ConStr,"")
Re.Pattern="</" & TagName & "([^>])*>"
ConStr=Re.Replace(ConStr,"")
End Select
ScriptHtml=ConStr
Set Re=Nothing
End Function
'函數(shù)名：ScriptHtml
'作 用：過濾html標(biāo)記
'參 數(shù)：ConStr ------ 要過濾的字符串
'==================================================
Function ScriptHtml(Byval ConStr,TagName,FType)
Dim Re
Set Re=new RegExp
Re.IgnoreCase =true
Re.Global=True
Select Case FType
Case 1
Re.Pattern="<" & TagName & "([^>])*>"
ConStr=Re.Replace(ConStr,"")
Case 2
Re.Pattern="<" & TagName & "([^>])*>.*?</" & TagName & "([^>])*>"
ConStr=Re.Replace(ConStr,"")
Case 3
Re.Pattern="<" & TagName & "([^>])*>"
ConStr=Re.Replace(ConStr,"")
Re.Pattern="</" & TagName & "([^>])*>"
ConStr=Re.Replace(ConStr,"")
End Select
ScriptHtml=ConStr
Set Re=Nothing
End Function
相關(guān)文章
有時候我們需要去掉字符串中最后一個逗號，因為我們用到的數(shù)組等，會多個空值，這里簡單分享一下，其實前端js與后臺asp結(jié)合比較好2010-05-05
使用FSO把文本信息導(dǎo)入數(shù)據(jù)庫...2006-08-08
今天在工作中遇到了一個問題，需要按時間查詢，可是查詢出來的結(jié)果顯示的不正確。2009-12-12
最近開通了，可以發(fā)表評論就一直被垃圾評論和留言困擾，一直沒有找到很好的解決辦法。今天發(fā)現(xiàn)了這個可以防止垃圾評論的asp代碼,特提供給大家，希望大家能擺脫2007-12-12
asp 常用函數(shù)用法...2006-10-10
防采集的原理非常簡單，首先放一段動態(tài)語句，把訪問者的IP加入到數(shù)據(jù)庫的一個表里，然后在頁面底部加入一個JS，JS直接訪問動態(tài)頁面，將訪問者的IP加入到數(shù)據(jù)庫的另外一個表里。2010-04-04
ASP語言實現(xiàn)對SQL SERVER數(shù)據(jù)庫的操作
目前有很多介紹用ASP開發(fā)網(wǎng)絡(luò)數(shù)據(jù)庫的程序例子，但絕大部分是利用ACCESS作底層數(shù)據(jù)庫。相對于ACCESS而言，SQL SERVER數(shù)據(jù)庫系統(tǒng)要復(fù)雜得多，因此在程序開發(fā)中需要多做一些工作。筆者結(jié)合自己開發(fā)管理信息系統(tǒng)的經(jīng)驗，在此試舉一例，與感興趣的朋友共同交流2015-09-09
asp中需要獲取某年總共有多少天，主要是利用了asp中的DatePart函數(shù)2012-07-07
asp中文件與文件夾常用處理函數(shù)(文件后綴、創(chuàng)建文件等)
asp中尤其是需要生產(chǎn)靜態(tài)的cms系統(tǒng)中，經(jīng)常需要對一些文件進(jìn)行判斷與創(chuàng)建，刪除的操作，這里整理了一些，基本上滿足了基本需要。2011-01-01
ASP獲取ACCESS數(shù)據(jù)庫表名及結(jié)構(gòu)的代碼
此方法可獲得ACCESS數(shù)據(jù)的表名及其結(jié)構(gòu)，數(shù)據(jù)類型等... 程序過濾了幾個ACCESS數(shù)據(jù)庫的幾個隱藏表(可能是導(dǎo)致ACCESS數(shù)據(jù)庫刪除數(shù)據(jù)還會變大的原因)2008-08-08