联系

点击这里立即发消息给我

E_mail: 3156583381@qq.com

条码二维码软件列表
其他软件列表导航
登录
用户:
密码:
 

站点日历
73 2018 - 1 48
 123456
78910111213
14151617181920
21222324252627
28293031




日志搜索

 标题   内容

联系

点击这里立即发消息给我

E_mail: 3156583381@qq.com


ASP生成静态代码,可用模板技术,非常简单 ASP查看文件夹里的所有文件
晴天 asp提取出字符串中的数字   [ 日期:2011-04-06 ]   [ 来自:本站原创 ]

方法(一)
只提取字符串最前面的数字。

str="宫心计01"
Response.Write RegExpTest("[a-z0-9-]+",str)(0)
Function RegExpTest(patrn, strng) '以数组返回
    Dim regEx, Match, Matches
    Dim i, RetStr()
    i = 0
    Set regEx = New RegExp
    regEx.Pattern = patrn
    regEx.IgnoreCase = True
    regEx.Global = True
    Set Matches = regEx.Execute(strng)
    For Each Match in Matches
'        RetStr = RetStr & Match.Value
        Redim Preserve RetStr(i)
        RetStr(i) = Match.Value
        i = i + 1
    Next
    RegExpTest = RetStr
End Function


方法(二)
提取字符串中所有的数字。当字符中无数字输出为空

function RegExpTestsp(str,pat) 
     Dim r, Match, Matches 
     Set r = New RegExp 
     r.Pattern = pat 
     r.IgnoreCase = false 
     r.Global = True 
     Set Matches = r.Execute(str) 
     For Each Match in Matches 
     RetStr = RetStr & Match.Value 
     Next 
     RegExpTestsp = RetStr 
End function 
PValue = "宫心09数组返回01" 
pat="[\d]+" 
response.write(RegExpTestsp(PValue,pat))



在本网站提供显示的任何文字内容及图片仅供学习研究参考之用,若有觉的侵犯了您的合法权益,请联系删除!
Copyright@zg126.net all rights reserved 2010-2016