asp下替换非数字为空的正则
作者：
最近用到将字符串替换为空的函数，上网搜了一下这个简单的东西，网上没有，于是自己写个asp下替换字符串为空的正则，太简单了，见笑了
function replacestr(str)
dim re
set re=new regexp
re.ignorecase=true
re.global=true
re.pattern="\D"
str=re.replace(str,"")
replacestr=str
set re=nothing
end function
dim re
set re=new regexp
re.ignorecase=true
re.global=true
re.pattern="\D"
str=re.replace(str,"")
replacestr=str
set re=nothing
end function