ASP如何截取111abcd222QQQQQQ111abcedws222中111到222之间的内容

ASP如何截取111abcd222QQQQQQ111abcedws222中111到222之间的内容

function strCut(a)

dim re,kk,bb,cc

cc=""

set re=New Regexp

re.ignoreCase=true

re.global=true

re.pattern="111(\w+?)222"

set kk= re.execute(a)

for each bb in kk

if cc="" then

cc=re.replace(bb,"$1")&":"

else

cc=cc&re.replace(bb,"$1")

end if

next

strCut=split(cc,":")

end function

response.write strCut("111abcd222QQQQQQ111abcedws222aaaasd")(0)

response.write chr(13)

response.write strCut("111abcd222QQQQQQ111abcedws222aaaasd")(1)

%>