sumar despues de listado

[cristianf]

NO ME SALE: ESTOY CON EL CODIGO ASI PERO SIGUE SIN SUMAR SDOLO TOMAR EL LOGICO VALOR TOTALES=0 SI LE AGREGO TOTALES = 0 + RESULT.FIELDS (PRECIO) SOLO ME MUESTRA EL RESULTADO DE UNA SOLA, NO DEL TOTAL COMO LO NECESITO.

... CONEXION ETC ETC
Tabla.Open Temp, Conexion
If Err=0 then%>
<table><tr><th>Vendedor</th><th>Precio</th></tr>
<% 'Inicializamos el totalizador, para evitar conflictos con basura
Totales= 0
while Tabla.EOF=False
%>
<%=Tabla.Fields("vendedor")%> <%=Tabla.Fields("precio")%>
<% Tabla.MoveNext
wend
%>
Totales<th><%=Totales%></th>
<% else
'Mostramos el error y la consulta para diagnostico
Response.Write "Pequeño Error: SQL="& Temp & "<br/>Error: <br/>" & Err
end if%>
EN ESTE CASO ME MUESTRA EL LISTADO REQUERIDO PERO EL TOTAL ES = 0