ASP从字符串中提取数字或者字符串转数字型的方法

摘要： Cint函数是返回一个数字类型但是参数需要是有效的表达式，也就是说转换的的确是数字，比如字符串“123”，就可以用Cint("123") 转换成数字型。 类似“...

Cint函数是返回一个数字类型但是参数需要是有效的表达式，也就是说转换的的确是数字，比如字符串“123”，就可以用Cint("123") 转换成数字型。 类似“6879汉字汉字”这样的字符串Cint函数是没法转换的，这是指定内容的提取。用下面的函数可以达到把字符串中的数字提取出来。

<%

Function getNum(str)

Dim length,num

length=Len(str)

num=0

For i=1 To length

char=Mid(str,i,1)

If isNumeric(char) Then num=num*10+Int(char)

Next

getNum=num

End function

'-----使用方法

a=getNum("6879汉字汉字")

'-----使用方法

response.write a

%>