Question

asp 怎么屏蔽数字的代码

举例说明：
原内容：从前有座山，山上有3265个和尚，山下有12356个。

我想要的：从前有座山，山上有*********个和尚，山下有********个。

Answer 1

<%
Function redhe2c(strHTML)
'ON ERROR RESUME NEXT
Dim objRegExp, strOutput
Set objRegExp = New Regexp
objRegExp.IgnoreCase = True
objRegExp.Global = True

'(1)这种一个数字替换一个*号
'objRegExp.Pattern = "[0-9]"
'strOutput = objRegExp.Replace(strHTML, "*")
'(2)数字连接部分替换成 *********
objRegExp.Pattern = "[0-9]+"
strOutput = objRegExp.Replace(strHTML, "*********")
redhe2c = strOutput
Set objRegExp = Nothing
End Function
str="从前有座山，山上有3265个和尚，山下有12356个。"
response.write redhe2c(str)
'(1)输出:从前有座山，山上有****个和尚，山下有*****个。
'(2)输出:从前有座山，山上有*********个和尚，山下有*********个。
%>