Errore di estrazione e valori non validi.

[SuperMariano81]

Buongiorno a tutti
ho un piccolo problema, estraggo da un DB dei dati e li inserisco in un vettore con 23 indici, se però la query mi estrae meno record la procedura si blocca.
Se la query mi da un risultato inferiore ai 23 record che effettivamente mi servono per i restati dovrei dargli dei valori per me non validi,(numero negativo) per indicare la mancanza stessa del dato (li inserisco successivamente in un grafico JS e non posso mettere del testo)
I vettori li inizializzo così:

A_misure = array(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0)
A_giorni = array(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0)

Vi allego il codice di inserimento

Do until i > UBound(A_misure)
   A_misure(i) = rs("dati") * 0.1
   A_giorni(i) = rs("DataMisura1")
   rs.movenext
   i = i + 1
loop
rs.close
end function

All'interno del codice dovrei mettergli una cosa così:
if rs.eof then vettore(i) = -1
che dite si può fare?

[optime]

perche' non inizializzi l'array con -1 invece che con 0?

[SuperMariano81]

corretto il tuo suggerimento, intato ho modificato la procedura così:

do until i > UBound(A_misure) 'or until (rs.eof)
	if rs.eof then 
				a_misure(i) = -1
				if i = 0 then 
						a_giorni(i) = database
					 	else
					 	a_giorni(i) = DateAdd("d",-1,a_giorni(i-1))
				 end if
				 data_assenti = 1
				else
	A_misure(i) = rs("dati") * 0.1
   A_giorni(i) = rs("DataMisura1")
  	rs.movenext
	end if
	i = i + 1
	loop
	rs.close
end function

Sembra funzionare che dici, è una cosa corretta oppure meglio un altra strada? :master: