function nohtml(str)
dim re
Set re = new RegExp
re.IgnoreCase = true
re.Global = True
re.Pattern = "(\<.[^\<]*\>)"
str = re.replace(str," ")
re.Pattern = "(\<\/[^\<]*\>)"
str = re.replace(str," ")
str = replace(str," ","")
str = replace(str," ","")
nohtml = str
set re = nothing
end function
dim re
Set re = new RegExp
re.IgnoreCase = true
re.Global = True
re.Pattern = "(\<.[^\<]*\>)"
str = re.replace(str," ")
re.Pattern = "(\<\/[^\<]*\>)"
str = re.replace(str," ")
str = replace(str," ","")
str = replace(str," ","")
nohtml = str
set re = nothing
end function
ASP 去除 HTML 標(biāo)記與空格的正則
用 ASP 實(shí)現(xiàn)的去除內(nèi)容的 HTML 標(biāo)記和空格的實(shí)現(xiàn)代碼。