Cómo ASP intercepta el contenido entre 111 y 222 en 111abcd222QQQQQQ111abcedws222

función strCut(a)

dim re, kk, bb, cc

cc=""

set re=Nueva expresión regular

re.ignoreCase=true

re.global=true

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

establecer kk= re.execute(a)

para cada bb en kk

si cc="" entonces

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

else

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

end if

siguiente

strCut=split(cc, ":")

finalizar función

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

respuesta.write chr(13)

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

gt;