Question

asp 数据列表出来后 对列表中的数据进行求和

检索后数据列表输出后
姓名 班级 得分
小明 2 30
小王 2 20
小张 2 40
总分怎么求和 ASP怎么写
得分字段名为 dengfen

Answer 1

如果你要用循环输出表,可以在循环体中进行累加,如:
zongfen = 0
Do Until Rs.EOF
zongfen = zongfen + Rs("dengfen")
Rs.MoveNext
Loop
或者使用合计查询
Set Rs = Conn.Execute("SELECT SUM(dengfen) FROM 表名 WHERE 与列表相同的查询条件")
Response.Write "总分:" & Rs(0)
Rs.Close

追问

Dim i
i = 0
Do While Not rs.BOF And Not rs.EOF
strToPrint = strToPrint & " " & rs("dengfen") & "" & VBCrlf
strToPrint = strToPrint & " " & VBCrlf
strToPrint = strToPrint & " " & VBCrlf
If i >= intPageSize Then Exit Do
rs.MoveNext
Loop
rs.Close
需要统计出dengfen的总和
高手帮帮忙

追答

Dim i, zongfen
zongfen = 0
i = 0
Do While Not rs.BOF And Not rs.EOF
strToPrint = strToPrint & " " & rs("dengfen") & "" & VBCrlf
If Not(IsNull(rs("dengfen"))) Then zongfen = zongfen + CDbl(rs("dengfen"))
If i >= intPageSize Then Exit Do
rs.MoveNext
Loop
rs.Close
Response.Write "总分:" & zongfen

Answer 2

列表是循环输出的嘛，循环的时候加起来就行了