asp累加如何将总数量、总金额显示在某日最后一条数据的备注栏？
数据累加结果显示，我只想在某日最后一条数据的备注栏显示总数量和总金额，如何做！

[code=vb][<%set rs=server.createobject("adodb.recordset")
sql=("select * from 销售 order by 销售日期 ")
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write "没有数据！"
    else
%>
<table border="1" width="100%" id="table1" cellspacing="0">
<tr>
<td>数量</td>
<td>售价</td>
<td>合计</td>
<td>销售日期</td>
<td>备注</td>
</tr>
<%dim depname
for m=1 to rs.PageSize
    shuliang=rs("数量")
    jine=rs("数量")*rs("售价")
    if depname<>Rs("销售日期") Then
       total_num=0
       total_mon=0
    else 
       total_num=total_num+shuliang
       total_mon=total_mon+jine
    end if   
%>
<tr>
<td><%=rs("数量")%></td>
<td><%=rs("售价")%></td>
<td><%=formatcurrency (jine,2)%></td>
<td><%=rs("销售日期")%></td>
<td><%Response.Write "日累计："&total_num&"件,"&total_mon&"元"%>　</td>
</tr>
<%depname=Rs("销售日期")
    rs.MoveNext
     if rs.EOF then
       exit for 
     end if
    next
end if
%>
</table>
/code]
------解决方案--------------------
这个你直接在数据源再加一行，把总数量和总金额算好，放在数据源的最后一行，在页面显示的时候，就不区分明细数据还是汇总数据
------解决方案--------------------
控制好你的数据行闭合输出就行了

<%set rs=server.createobject("adodb.recordset")

sql=("select * from 销售 order by 销售日期 ")

rs.open sql,conn,1,1

if rs.eof and rs.bof then

response.write "没有数据！"

else

%>

<table border="1" width="100%" id="table1" cellspacing="0">

<tr>

<td>数量</td>

<td>售价</td>

<td>合计</td>

<td>销售日期</td>

<td>备注</td>

</tr><tr>

<%

dim depname

total_num=0

total_mon=0

for m=1 to rs.PageSize

    

    shuliang=rs("数量")

    jine=rs("数量")*rs("售价")



    

    diff=false

    

    if depname<>Rs("销售日期") Then

       depname=Rs("销售日期")

       if m<>1 then  diff=true

    end if

    

    if diff Then

        Response.Write "<td>日累计："&total_num&"件,"&total_mon&"元</td></tr><tr>"

        total_num=shuliang

        total_mon=jine

    else

      total_num=total_num+shuliang