Lo que podrias hacer es que dentro del loop que haces para imprimir los valores en la pantalla, creas una variable en la cual vaya sumandole los valores que deseas.
<%
Response.Write("<table><tr><td>valor</td></tr>")
Do while not Datos.EOF
Response.Write(Datos("valor"))
suma = suma + Datos("valor")
Datos.MoveNext
loop
Response.Write("</table><br>"&suma)
%>
No se si eso es lo que ocupas.