contenuto Array

[mcviper909]

Allora......
Ho una array dove ci sono dei numeri divisi da una virgola.
Con questi numeri poi devo fare delle query.
Come faccio a controllare che lo stesso numero non mi esca fuori più di una volta?

Es
il mio array è :
1
2
2
3
4
3
3
Io vorresei prendere solo
1
2
3
4
In pratica il risultato dovrebbe essere lo stesso di una:
SELECT DISTINCT NOMECAMPO FROM NOMETABELLA

Grazie

[Roby_72]

Devi scorrere un array e crearne un altro solo con i numeri estratti una sola volta.

Roby

[mcviper909]

Facile a dirsi......

[mcviper909]

for i = 1 To ubound(split_numeri_id)

Response.write split_numeri_id(i) & "
"

Redim nuovo_array()

for c = o to ubound(nuovo_array)
if split_numeri_id(i) <> nuovo_array(c)
nuovo_array(c) = split_numeri_id(i)
Next
else
Next

Stavo provando una cosa drel genere ma non va....
Il primo problema che mi salta all'occhio è che non so che variabile mettere nel redim per la grandezza del nuovo array

[optime]

1. trasforma l'array in una stringa (con JOIN)
2. quando hai bisogno, cerchi il tuo numero (completo di delimitatori) nella stringa con INSTR

[mcviper909]

Originariamente inviato da optime
1. trasforma l'array in una stringa (con JOIN)
2. quando hai bisogno, cerchi il tuo numero (completo di delimitatori) nella stringa con INSTR

Ma io non devo cercare una stringa nell'array......

[mcviper909]

Help me

[Sypher]

Originariamente inviato da mcviper909
Ma io non devo cercare una stringa nell'array......

devi cercare se il numero è già presente no?
ragiona un po su quello che ha detto optime, mi sembra buona come idea!

[albis]

dovresti fare una cosa del genere

dim ArrayDoppie(10)
dim arrayPulite()
dim strEsistenti
dim ContaTrova
ContaTrova = 0
strEsistenti = "|"

ArrayDoppie(0) = 1
ArrayDoppie(1) = 3
ArrayDoppie(2) = 1
ArrayDoppie(3) = 4
ArrayDoppie(4) = 6
ArrayDoppie(5) = 9
ArrayDoppie(6) = 4
ArrayDoppie(7) = 3
ArrayDoppie(8) = 77
ArrayDoppie(9) = 44
ArrayDoppie(10) = 2

for i = 0 to UBound (ArrayDoppie)
	
	if InStr(1,strEsistenti, "|" & ArrayDoppie(i) & "|") = 0 then
		Redim preserve arrayPulite(ContaTrova)
		arrayPulite(ContaTrova) = ArrayDoppie(i)
		strEsistenti = strEsistenti & ArrayDoppie(i) & "|"
		ContaTrova = ContaTrova +1
	end if

next

for i = 0 to UBound (arrayPulite)
	
	Response.Write arrayPulite(i) & "|
"
	
next

[mcviper909]

Grazie Albis.

P.s. ho appena rinnovato l'abbonamento all'AS ROMA e aspetto emersone capello al varco