关于数据汇总问题！在线等！请高手指教.....

[lwj180]

现有个报表的字段是购进金额，对应数据的代码是

<%
if rs("cgrksl") <>"" and rs("price")<>"" and rs("cgthsl")<>"" then
%>

<td class="Font13"><%= (clng(rs("cgrksl"))-clng(rs("cgthsl")))*(rs("price")) %></td>

<% else %>

<td class="Font13"><%=clng(rs("cgrksl"))*(rs("price"))%></td>

<%
end if
%>

这有成千上万条记录，现要对这些数据进行汇总（就是每项金额相加），怎么弄，望高手把代码贴出来，万分谢谢！

[邪V风]

定义一个变量
Dim i,j
j=0
…………
do while not rs.eof
i=rs（"购进金额")

…………
j=i+j
rs.movenext

loop

[tiandiqing]

建议直接写在sql里

用case 选择语句实现

这样得出一个记录集，你直接从这个记录集获取记录就可以了，效率估计会高

[avon2006]

你指的是哪个字段的汇总???

[lwj180]

能否把代码贴一下出来，就是对字段“购进金额”的每项开支进行统计（求和），每项开支里对应的数据代码如上所示，请帮帮我 谢谢！

[lwj180]

帮帮我啊 好急

[lwj180]

帮帮我啊 好急