想取值sum1,sum2,sum3....并相加得出总数
我写了这个,但不知错在哪,想取值sum1,sum2,sum3....并相加得出总数Dim i,Hdk
Hdk=0
For i=1 To 21
Dim Hsaa&i : Hsaa&i=Easp.Post("sum&i:n")
if Hsaa&i="" Then
Hsaa&i=0
Hdk=Hdk+Hsaa&i
end if
Next
Easp.WC Hdk
2012-05-25 14:31
2012-05-28 09:39
2012-06-07 13:47
2012-06-08 08:37
2012-06-10 13:39
2012-06-13 17:25
程序代码:Dim i,s,t,sum
Redim t(10)
For i = 0 to 10
t(i) = i'request.Form("sum"&i)
response.Write t(i)
sum = sum + t(i)
Next
response.Write sum
2012-06-13 17:34