您的位置:首页 > 其它

从字母数字字符串中提取数字

2012-03-06 14:32 267 查看
 

字符数字字符串过滤出数字

Dim   strNote ,str  

   for i=1 to len(str)   

    if IsNumeric(mid(str,i,1)) then '判断字符串中是否存在数字:存在返回true,不存在返回false  

     strNote=strNote & mid(str,i,1)    '从字符串中取出数字

    end if   

   next   

   response.write   strNote   
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: