asp去除html标记与空格的正则
- 作者: 东方神起去哪了
- 来源: 51数据库
- 2021-07-31
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
推荐阅读
