intanto fatemi capire se so minimamente usare gli array
per inserirli in un array monodimensionale array(num)
ho fatto così
codice:
While ((Repeat1__numRows <> 0) AND (NOT Recordset1.EOF))
dim nome
nome=((Recordset1.Fields.Item("nome").Value))
array(Repeat1__numRows*-1)=(nome)
Repeat1__index=Repeat1__index+1
Repeat1__numRows=Repeat1__numRows-1
Recordset1.MoveNext()
Wend
%>
>
e poi per stampare il contenuto
codice:
<% for ii = 0 to Ubound(array) %>
<%= array(ii) &";" %>
<% next %>
ora veniamo al dunque
in un database ho la tabella persone
devo prendere ad esempio i dati dal campo mail e nome
mettiamo che voglia usare un array fatto come detto prima array(m, n)
e voglia inserire i mail in "m" e i nomi in "n"
come faccio a mettere i valori nell'array?
e successivamente comme faccio a prelevarli?
ho provato così ad inserire i dato ma non funziona dà errore alla riga rossa
codice:
numemail=CLng(numemail)
dim array()
Redim array(numemail, numemail)
While ((Repeat1__numRows <> 0) AND (NOT Recordset1.EOF))
dim mail, nomeutente
mail=((Recordset1.Fields.Item("email").Value))
nomeutente=(Recordset1.Fields.Item("nomeutente").Value)
array(Repeat1__numRows*-1, Repeat1__numRows*-1)=(mail, nomeutente)
Repeat1__index=Repeat1__index+1
Repeat1__numRows=Repeat1__numRows-1
Recordset1.MoveNext()
Wend
%>