Devo recuperare due valori dallo stesso campo di una tabella, poi li devo usare per sviluppare un calcolo.
Ho provato a farlo direttamente dalla query ma non mi riesce.
Adesso hoh utilizzato il metodo GetRows ed i due valori mi ritornano.
Quando però provo ad utilizzarli nella formula mi ritorna l'errore:
Errore di run-time di Microsoft VBScript (0x800A0009)
Indice non incluso nell'intervallo: '1'
Di seguito le linee di codice:
<%
set val = outpostDB.Execute("Select valore_quota from valori where id = 1 and data_quota = #31/12/2004# ")

If Not val.EOF then
arrvaloriSet = val.GetRows()
End If
%>
<%
val.Close
set val = Nothing
%>
<%
set val2 = outpostDB.Execute("Select valore_quota from valori where id = 1 and data_quota = #30/09/2005# ")

If Not val2.EOF then
arrvalori2Set = val2.GetRows()
End If
%>
<%
val2.Close
set val2 = Nothing
%>
<%
outpostDB.Close
set outpostDB = Nothing
%>
<%
iRowNumber = ubound(arrvaloriSet,2)
For iCounter= 0 to iRowNumber
Response.Write(" "& arrvaloriSet(0,iCounter) & " ")
Next
%>
<%
iRowNumber2 = ubound(arrvalori2Set,2)
For iCounter2= 0 to iRowNumber2
Response.Write(""& arrvalori2Set(0,iCounter2) & " ")
Next
%>
'questa è la linea che mi ritorna l'errore
<% Response.Write("("& arrvaloriSet(0,iCounter) & "/"& arrvalori2Set(0,iCounter2) & ")") %>

Qualcuno sa dirmi dove ho sbagliato?

Grazie per l'aiuto
Valter