unire due array

[KLINKO]

come si uniscono due array?


pippo= Array("/robots.txt","/index.asp")

pluto= Array("/404.asp","/500.asp")

[santino83]

oddio non mi sembra che in asp ci sia una funzione propria, nè che scrivendo c=pippo+pluto si ottenga quello che si vuol ottenere, quindi direi:

pippo=array(......)
pluto=array(....)

redim unione(ubound(pippo)+ubound(pluto))

for i=0 to ubound(pippo)
unione(i)=pippo(i)
next
for j=0 to ubound(pluto)
unione(ubound(pluto)+j+1)=pluto(j)
next

o qualcosa di simile.... allego questa funzione non so se possa interessare:

Funzione Join
Restituisce una stringa creata tramite l'unione di un certo numero di sottostringhe di una matrice.

Join(elenco[, delimitatore])

Argomenti
elenco

Obbligatorio. Matrice unidimensionale contenente le sottostringhe da unire.

delimitatore

Facoltativo. Carattere stringa utilizzato per separare le sottostringhe nella stringa restituita. Se omesso, verrà automaticamente utilizzato lo spazio (" "). Se è una stringa di lunghezza zero, verranno unite tutte le voci dell'elenco senza alcun delimitatore.

Osservazioni
Nell'esempio seguente la funzione Join viene utilizzata per unire le sottostringhe di MyArray:

Dim MyString
Dim MyArray(3)
MyArray(0) = "Egregio"
MyArray(1) = "Signor"
MyArray(2) = "Giovanni"
MyArray(3) = "Giudici"
MyString = Join(MyArray) ' Il valore di MyString è "Egregio Signor Giovanni Giudici".

[optime]

se quei due array li ottieni davvero in quel modo, usa un'unica istruzione array col contenuto complessivo

[santino83]

Originariamente inviato da optime
se quei due array li ottieni davvero in quel modo, usa un'unica istruzione array col contenuto complessivo

l'intelligenza di opty è disarmante

[optime]

Originariamente inviato da santino83


l'intelligenza di opty è disarmante

quella è pigrizia...

cmq, immaginando che gli array non siano stati ottenuti in quel modo, ma provengano da elaborazioni più complesse, si può usare il codice

sDelim = ","
ArrayUnico = SPLIT(JOIN(Array1, sDelim) & sDelim & JOIN(Array2, sDelim), sDelim)

impostare sDelim col delimitatore che più aggrada