Question

ASP 字符串转整型数字类型问题

我想把字符串类型转成数字类型,如字符串为"6879汉字汉字",转换后为"6879",我用cint函数不行,老是报错，说数据类型不正确。

Answer 1

你这个已经不是类型转换了 是指定内容的提取 cint 函数是返回一个数字类型但是参数需要是有效的表达式 也就是说 转换的的确是数字 类似“6879汉字汉字”这样的是没法转换的

给你一个提取数字的函数 这个才能满足你的需要
<%
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
%>

Answer 2

我给你写了一个函数，用来完成你这样的转换，完整的函数和测试代码如下：

<%
function get_int(s)
x=0
i=1
while i<len(s) and mid(s,i,1)>="0" and mid(s,i,1)<="9"
x=x*10+cint(mid(s,i,1))
i=i+1
wend
get_int=x
end function

i=get_int("6879汉字汉字")+0
response.write(i)
%>

Answer 3

<%
dim a
a="6879汉字汉字"
a=replace(str,"汉字汉字","")
%>