Auto opdatering af Input felt.

Her er min kode.

Sub Beregn()
    form1.test.value = 0           
    for i=0 TO form1.dummie.value                               
        form1.test.value = cint(form1.test.value) + form1.a & i &.value       
        'form1.test.value = cint(form1.test.value) + cint(form1.a0.value)       
    next   
end sub

For i = 0 to Antal
    Response.Write "<td width=50><INPUT TYPE=Text NAME = a" & i & " SIZE=10 MAXLENGTH=15 onChange=beregn() Value=0>"
Next


Response.write "<INPUT TYPE= HIDDEN id=dummie value="&Antal&">"

Response.Write "<td width=75><input type=text SIZE=10 MAXLENGTH=15 id=test value=0 disabled></td>" & chr(13)


Når jeg bruger denne kode linie.
form1.test.value = cint(form1.test.value) + cint(form1.a0.value) virker den, men den udregner selvfølgelig kun med a0 værdi. hvis antal = 2 (a0 + a0 + a0).

Men ved denne linie:
form1.test.value = cint(form1.test.value) + form1.a & i &.value, får den ikke fat i a0 inputs værdi. How to??