Hola, hoy leí un post donde preguntaban cómo hacer si tengo una cadena y no quiero que se repitan números, letras o lo que sea... bueno, aquí les mando una función:
Código:
<%
function no_repetir(cadena,separacion)
V = Split(cadena,separacion)
cant = Ubound(V)
num = -1
do
num = num + 1
for i = num+1 to Cint(cant)
if Cstr(V(num)) = V(i) then
V(i) = ""
end if
next
loop until num = cant-1
for a = 0 to CInt(cant)
if Cstr(V(a)) <> "" then xcadena = xcadena & separacion & V(a)
next
no_repetir = right(xcadena,len(xcadena)-1)
end function
%>
ahora la página q llamará a la función
<%
cadena = "01,02,01,50,500,500"
response.Write(no_repetir(cadena,","))
%>
como ven digo q se imprima lo que devuelve la función, le envio la cadena con los datos y el otro parámetro dice de qué forma están separados los números, han podido ser palabras, letras y la separación x ejemplo un espacio.. bueno espero les sirva