Code:
Dim TotVal
TotVal=0
Do While Not objRS.EOF
Response.Write objRS("value") & "<br>"
TotVal = TotVal + objRS("value")
objRS.MoveNext
Loop
Response.Write TotVal
This is how you could do that.
Cheers!
_________________________
- Vijay G
Strive for Perfection