Buongiorno a tutti,
ho costruito un array dinamico che dovrebbe ciclare i risultati di una query del db e metterli in un array. Ho provato in ogni modo, ma non riesco a combinare...Come risultato mi crea solo il primo array, e ripete sempre quello. Cosa ho sbagliato?

frmArray(1) = 008
frmArray(2) = 008
frmArray(3) = 008

posto il codice

codice:
<%

Dim frmArray(20)
While (NOT Recordset1.EOF) 
frmArray = (Recordset1.Fields.Item("Codice_Casa").Value)
   Repeat1__index=Repeat1__index+1
   Repeat1__numRows=Repeat1__numRows-1
   Recordset1.MoveNext()
Wend
'count è risultato di Recordset.recordcount
for i=i+1 to count
Response.write "frmArray(" & i & ") = " & frmArray(i) & "
" 
next
 
%>
Grazie in anticipo per qualsiasi aiuto!