problema Split

[m_ferraris]

Ciao a tutti e grazie in anticipo per il vostro aiuto; questo è il mio problema.

ho una tabella del databese in cui ho una colonna con dei valori dentro separati da una virgola e li devo estrarre in una serie per visualizzarli.
Per far ciò eseguo uno split:

<%
mydati1=Request.Form("dati1")
mycampi=Split(mydati1,",")
codice_articolo = mycampi(0)
codice_articolo1 = mycampi(1)
codice_articolo2 = mycampi(2)
codice_articolo3 = mycampi(3)
codice_articolo4 = mycampi(4)
codice_articolo5 = mycampi(5)
codice_articolo6 = mycampi(6)
%>

e poi richiamo il valore all'interno del campo di testo nel seguente modo:

<input type="text" name="codice_articolo" value="<%response.write(codice_articolo)%>">

....

input type="text" name="codice_articolo6" value="<%response.write(codice_articolo6)%>">

Il problema sopraggiunge quando all'interno della tabella ci sono meno valori dei 6 max che devo andare ad inserire.

Come posso creare una condizione che nel caso non ci fosse un valore mi mette uno spazio bianco al posto di restituirmi l'errore:

Errore di run-time di Microsoft VBScript (0x800A0009)
Indice non incluso nell'intervallo: '[number: 6]'

Grazie mille

[optime]

UBOUND(array) ti riporta il numero di elementi di cui è costituito l'array. usalo per i controlli.

[m_ferraris]

non ho mai usato unbound; non so proprio come fare, mi potreste dare una mano?

[m_ferraris]

ho trovato una soluzione co Uboun mediante la costruzione del seguente codice:

<%
Dim mydati1

mydati1=Request.Form("dati1")
mycampi=Split(mydati1,",")

ubound(mycampi)

for loopctr = 0 to ubound(mycampi)
response.write mycampi(loopctr)
next
%>

però il problema ora è un'altro: ho bisogno che siano separati valore per valore come avveniva prima in quanto devo inserirlo uno per uno in un campo testo per poi completare colonne diverse della tabella del daabase.

chi mi sa aiutare?