ASP page doesn't SUM amounts correctly

[ampebbles]

I'm fairly new to asp and am not sure why my web page doesn't sum the
amount from the access database correctly. Example, one teacher has 4
donations that should total $1,238.68, but the total on the page shows
only $838.68 (one of the $400 donation doesn't show). It happens
periodically to different teacher with no apparent pattern. Some
teachers total just fine. Thansk in advance!! Here's the section of
code:

Set rstSimple = cnnSimple.Execute("SELECT * FROM donations WHERE
(teachID ='" & teachID & "')")

Do While Not rstSimple.EOF
%>
<tr>
<td><%= rstSimple.Fields("orderdate").Value %></td>
<td><%= rstSimple.Fields("dateDonated").Value %></td>
<td><%= rstSimple.Fields("paymentType").Value %></td>
<td><%= rstSimple.Fields("donorFirstName").Value %>&nbsp;<%=
rstSimple.Fields("donorLastName").Value %></strong></td>
<td><%= rstSimple.Fields("donorAddress1").Value %><br><%=
rstSimple.Fields("donorAddress2").Value %></td>
<td><%= rstSimple.Fields("donorTown").Value %>,&nbsp; <%=
rstSimple.Fields("donorState").Value %>&nbsp;&nbsp;<%=
rstSimple.Fields("donorZip").Value %></td>
<td><%= rstSimple.Fields("donorPhone").Value %></td>
<td><%= rstSimple.Fields("email").Value %></td>
<td><%= rstSimple.Fields("amount").Value %></td>
<td><a href="Admin_add_cost.asp?Teacher=<%= teachID %>&id=<%=
rstSimple.Fields("id").Value %>">Delete</a></td>
</tr>
<%
rstSimple.MoveNext
Loop
rstSimple.Close
Set rstSimple = Nothing

'sum the donations for the teacher
Set rstSimple = cnnSimple.Execute("SELECT amount, SUM (amount) AS
total_donations FROM donations WHERE (teachID ='" & teachID & "') GROUP
BY amount")
total_donations = 0
Do While Not rstSimple.EOF
total_donations = total_donations + rstSimple.fields("amount")
rstSimple.MoveNext
Loop
%>

[Larry Linson]

I'd wager you'll get better answers about ASP if you asked in a newsgroup
devoted to ASP. The subject of this newsgroup is Microsoft Access database
software... ASP pages sometimes use a Jet (the default DB Engine that comes
with Access) database, but not Access itself.

Larry Linson
Microsoft Access MVP

[ampebbles]

Thanks, I'll hunt for the ASP newsgroup.