Subscript out of range: 'cont'

[orcim]

Ciao.

L'errore è quello del titolo, il codice ASP è questo:

SQL1 = "SELECT COUNT(O2_PPM) AS strO2_PPM, O2_PPM FROM tbl_LISTFILES where id_cat = "& id_cat &" GROUP BY O2_PPM order by O2_PPM asc"

set rs = server.createObject("ADODB.Recordset")
rs.open SQL1, cn

NumeroDati = strO2_PPM 

redim arr_dato (NumeroDati)

if rs.eof then
response.write ("KO")

else

cont = 0

While Not rs.eof
	
arr_dato(cont) = rs("O2_PPM")
cont = cont + 1

rs.MoveNext
wend

end if

rs.Close
Set rs = Nothing 

cn.Close
Set cn = Nothing

Che sbaglio?

[Roby_72]

Stampa questa

NumeroDati = strO2_PPM

Roby

[orcim]

Grazie, ma non stampa niente...

[Roby_72]

E allora cosa cicli a fare, l'array non ha elementi.

Roby

[orcim]

Originariamente inviato da Roby_72
E allora cosa cicli a fare, l'array non ha elementi.

Roby

Ma i dati nel db mysql ci sono...

Se provo con access, funziona:

SQL1 = "SELECT O2_PPM FROM tbl_LISTFILES where id_cat = "& id_cat &" order by O2_PPM asc"

set rs = server.createObject("ADODB.Recordset")
rs.open SQL1, cn, 1, 3

NumeroDati = rs.RecordCount 

redim arr_dato (NumeroDati)

if rs.eof then

response.write ("ko")

else

cont = 0

While Not rs.eof	

arr_dato(cont) = rs("O2_PPM")

cont = cont + 1

rs.MoveNext
wend

end if

[Roby_72]

Mi sembra abbastanza evidente che questa

NumeroDati = rs.RecordCount

sia sostanzialmente differente da questa:

NumeroDati = strO2_PPM

O no?

Roby

[optime]

che è sta roBBa?

NumeroDati = strO2_PPM

perché non te lo leggi dal recordset?

[orcim]

Si, ma in access RecordCount funziona, mentre non funziona su MySQL.

Una documentazione MySQL sul web indica di utilizzare la sintassi:

SQL1 = "SELECT COUNT(O2_PPM) AS strO2_PPM, O2_PPM FROM tbl_LISTFILES where id_cat = "& id_cat &" GROUP BY O2_PPM order by O2_PPM asc"

Per contare i records... allora è sbagliato?

[optime]

leggi il mio post...

[orcim]

Originariamente inviato da optime
che è sta roBBa?

NumeroDati = strO2_PPM

perché non te lo leggi dal recordset?

GIUSTO !!!!

NumeroDati = rs("strO2_PPM")

Ma risponde sempre con Subscript out of range: 'cont' su questa riga:

arr_dato(cont) = rs("O2_PPM")