Prima del ciclo imposti

somma1 = 0

Dentro al Loop fai

somma1 = somma1 + rs("campo")

Fuori dal ciclo stampi la variabile somma1

Roby