Detectar dos splits seguidos

[u_goldman]

Aqui nada mas como siempre donde no me llaman, pero esto se puede hacer mucho mejor con una expresion regular:

Código:

<%
cadena = "u2_the_best_of_1960_1970_front.jpg"
'cadena = "u2_dublin_1993_back.jpg"
Set ObjRegEx = new RegExp
ObjRegEx.Pattern = "(\d{4})"
ObjRegEx.Global = True 
ObjRegEx.IgnoreCase = True

Set Matches  = ObjRegEx.Execute(cadena)

if Matches.Count = 1 then
	cadena = ObjRegEx.Replace(cadena, "($1)")
end if

Response.Write(cadena)
%>

Salud