Udregning i en lykke

Der er noget gruligt galt her... Kan man ikke skrive sætningen sådan her.. ???
jeg få allerede en fejl på den første line ( og selv om jeg fjerner "set" ) og hvis jeg fjerne linen helt få jeg fejl ved nr 3 (RStotal("antal...............
Hvordan skrive det så den tag alle de felter gange de 2 tal og laer en + så den kan tilføje de næste... :

COde:


set total =
do while not RStotal.eof
(RStotal("antal") * RSTotal("apris"))
+
RStotal.movenext
loop
response.Write(total)