Hola a todos:
Tengo un problema y por lo tanto lo expongo aquí a ver si alguien me puede ayudar.
Verán, intento buscar duplicados de nombres de archivos porque en mi web muchos los suben con las palabras juntas y otros con algunas de las palabras juntas y otras bien separadas.
Al subirlas ya tengo un código que reemplaza por ejemplo los espacios por _ y todos quedan de la misma forma.
Ahora bien, como la web se ha hecho demasiado grande, intento eliminar duplicados de nombres aunque estén mal escritos.
Tengo este código:
Código PHP:
<%
cadena = "the_u2_the_best_of_1960_1970_front.jpg"
frase = split(cadena, ".")
palabra = split(frase(0), "_")
Response.Write frase(0) &" frase <br>"
For i=0 to Ubound(palabra)
NuevaCadenaI = replace(cadena,palabra(i)&"_",palabra(i))
'Response.Write NuevaCadenaI&" Nueva Frase I<br>"
palabra1 = split(NuevaCadenaI, "_")
For a=LBound(palabra1) to Ubound(palabra1)
NuevaCadenaA = replace(NuevaCadenaI,palabra1(a)&"_",palabra1(a))
Response.Write NuevaCadenaA&" Nueva Frase A<br>"
Next 'a
Next i
%>
Lo hace casi bien, pero le faltan algunas opciones.
Yo quisiera que en el caso concreto de la cadena , los resultados de NuevaCadenaA quedaran asi, ( no me importa el orden):
theu2_the_best_of_1960_1970_front.jpg
theu2the_best_of_1960_1970_front.jpg
theu2thebest_of_1960_1970_front.jpg
theu2thebestof_1960_1970_front.jpg
theu2thebestof1960_1970_front.jpg
theu2thebestof19601970_front.jpg
theu2thebestof19601970front.jpg
theu2_thebest_of_1960_1970_front.jpg
theu2_thebestof_1960_1970_front.jpg
theu2_thebestof1960_1970_front.jpg
theu2_thebestof19601970_front.jpg
theu2_thebestof19601970front.jpg
theu2_thebest_of1960_1970_front.jpg
theu2_thebest_of19601970_front.jpg
theu2_thebest_of_9601970front.jpg
Y así sucesivamente con todas las combinaciones posibles quitando el separador _
Muchas gracias a todos.