Cosa sbaglio in questo ciclo?
codice:
punteggioTotale = 0
	for i = 0 to ubound(premio)
		query = "select * from PREMI where idPremio = "&premio(i)
		set RS = conn.execute(query)
		If not RS.eof Then
			punteggio = RS("punteggio")
			nomePremio = RS("nomePremio")
			'response.write nomePremio&"-"&punteggio
			punteggioTotale = punteggioTotale + punteggio<--linea 14
		End If
		RS.close
		Set RS = nothing
	next
ERRORE:
Errore di run-time di Microsoft VBScript error '800a000d'

Tipo non corrispondente

RichiestaPremio.asp, line 14