我要将列出的每条记录中的字段“金额”的数值相加，怎么写代码？请指点，感激不尽!!!

<%
dim sql
dim rs
set rs=server.createobject("adodb.recordset")
conn = "DBQ=" + server.mappath("kly1.mdb") + ";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
sql="select * from payout order by 凭证字号"
rs.Open sql,conn,3,2
if rs.EOF then
    Response.Write "暂时没有任何人员信息!"
    response.write"请添加."
response.end
end if
page=clng(request("txtpage"))
rs.pagesize=15
if page<1 then page=1
if page>rs.pagecount then page=rs.pagecount
%>

支出表

<% if page<>1 then%>


<% end if%>
<% if page<>rs.pagecount then%>


<% end if%>

第一页

>上一页

>下一页

>最后一页

刷新||日报表||人员信息||添加信息

---

<%
showonepage rs,page
%>
<%
sub showonepage(rs,page)
rs.absolutepage=page
for ipage=1 to rs.pagesize
rstoshow rs
    rs.movenext
     if rs.eof then exit for
     next
end sub
%>
<%sub rstoshow(rs)%>









         <% end sub%>

字号	日期	内容	金额(元)	添加时间	删除	修改
<%=rs("凭证字号")%>	<%=rs("日期")%>	<%=rs("内容")%>	<%=rs("金额")%>	<%=rs("添加时间")%>	删除	修改

页码:<%=page%>/<%=rs.pagecount%>

<%rs.close%>

---

 

就象共有几个会员、几个贴子之类的……

把我的例子改一下？

???