RS.Open "select sum(Total) from table1", CON, adOpenDynamic, adLockOptimistic
bind the result from this query to your total Field...