Array con numero totale record

[ab6499]

H bisogno di creare un Array in Asp in questo modo
Dim Commesse(n)
dove n corrisponde al numero di record appartenenti ad una tabella

Ho scritto questo codice ma non funziona.
Se però sistituisco ad Dim Commesse(n) Dim Commesse(100) (100 o qualsiasi numero maggiore o uguale al numero dei record della tabella) tutto funziona correttamente. Qualcuno mi sa dire dove sbaglio?
Grazie a tutti per il vostro aiuto

 
Dim n
Set conn = Server.CreateObject("ADODB.Connection")
conn.open(ConnessioneDb)
sql = "SELECT Count (Id) As TotCommesse FROM Commesse"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn,3 ,3
n=rs("TotCommesse")

Dim Commesse(n)
Set conn = Server.CreateObject("ADODB.Connection")
conn.open(ConnessioneDb)
sql = "SELECT * from Clienti where ...."
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn,3 ,3 

k=1
while not rs.EOF
Commesse(k)=rs("Ragione sociale")
rs.movenext
k = k + 1
wend
rs.close: set rs=nothing

[andreaciao_22]

guarda che fare una dim di una variabile array passandogli una variabile non è il massimo...

io proverei questo:

Dim Commesse()
ReDim Commesse(n)

fammi sapere...

altri errori:

connessione già aperta, inutile riaprirla;
recordset non chiuso prima di aprirlo nuovamente...

[ab6499]

Funzionaaaa!!!
Ottimo!! Grazie molte.

Ok per chiudere connessione e recorset gia aperti!

Grazie ancora
Aldo

[optime]

Originariamente inviato da andreaciao_22
guarda che fare una dim di una variabile array passandogli una variabile non è il massimo...

perché?

[andreaciao_22]

perchè si, dà sempre errori vbscript quando si tratta di variabili messe come dimensionamento di array..... d'altronde le tratta tutte variant...

[ab6499]

Quale potrebbe essere allora l'alternativa (se esiste) al metodo utilizzato.

[optime]

Originariamente inviato da andreaciao_22
perchè si, dà sempre errori vbscript quando si tratta di variabili messe come dimensionamento di array..... d'altronde le tratta tutte variant...

mai sentita questa

prova

<%
n=3000
redim myArray(n)
%>

e dimmi se ti dà errore

[andreaciao_22]

prova a fare un CInt(n) dentro alla dim Commesse... per me se la tratta come stringa la variabile...

comunque fare una redim di un'array dopo l'inizializzazione(non conoscendone la dimensione iniziale è buona norma...

[ab6499]

non da sicuramente errore, ma se i records sono più di 3000 cosa succede?

[andreaciao_22]

ma lui faceva dim commesse(n) optime, non la redim... è logico che vada in errore dai...