换掉字段中的数字

[kingsjava]

大家请帮忙老弟遇到问题了

我的一个字段中有数字与中文结合如

11体育
2娱乐
6方中

这字段的的值是我取别的表的ID与传的值结合写入到字段中的，现在我想把这字段的字显示
出来，然后怎么把数字取消掉，就显示汉字就行了，
我想要的显示结果如下：注数字有可能是三位，四位也有可能。。。。

体育
娱乐
方中

请帮忙

[yan11cn]

以下代码 测试可用

<%
Dim str
str="124哦呵呵"
response.write(zhongwen(str))

function zhongwen(str)
dim reg
set reg = New RegExp
reg.Global=true
reg.IgnoreCase = true
reg.Pattern="[\u4e00-\u9fa5]+"
str=trim(str)
if reg.Execute(str).count = 0 then
    zhongwen=""
else
    Set matches = reg.Execute(str)
	For Each match In matches
		zhongwen=zhongwen & match.value
	Next
end if
end Function
%>

[lzp4881]

<%
Dim str : str = rs("数据库字段")
Response.Write RemoveHTML(str)

Function RemoveHTML(strText)
Dim RegEx
Set RegEx = New RegExp
RegEx.Pattern = "\d+"
RegEx.Global = True
RemoveHTML = RegEx.Replace(strText, "")
End Function
%>