Problema con somma in ciclo

[ubbicom]

Ciao.

Con una query ed un ciclo estraggo una serie di dati:

     objRec.moveFirst()
          Do while not objRec.eof          
          
             strResultSet = cDbl(objRec("A")) * cDbl(objRec("B"))                    
    
          objRec.moveNext()
     Loop

strResultSet è il risultato della moltiplicazione tra il recordset A ed il recordset B, ad esempio:

1775
6319
39239

Come faccio ad ottenere la somma di tutti i strResultSet cioè 47333?

Grazie

[dizionario]

totale=0
     objRec.moveFirst()
          Do while not objRec.eof          
          
             strResultSet = cDbl(objRec("A")) * cDbl(objRec("B"))                    
             totale=totale+strResultSet 

          objRec.moveNext()
     Loop

[optime]

ubbi, mi deludi

strResultSet=0

objRec.moveFirst()
          Do while not objRec.eof          
          
             strResultSet = strResultSet + cDbl(objRec("A")) * cDbl(objRec("B"))                    
    
          objRec.moveNext()
     Loop

sappilo, che da sql puoi fare una SUM direttamente

[ubbicom]

Originariamente inviato da optime
ubbi, mi deludi

strResultSet=0

objRec.moveFirst()
          Do while not objRec.eof          
          
             strResultSet = strResultSet + cDbl(objRec("A")) * cDbl(objRec("B"))                    
    
          objRec.moveNext()
     Loop

sappilo, che da sql puoi fare una SUM direttamente

Si lo so grazie ma preferisco, almeno per il momento, scrivere il codice gradualmente per poi ottimizzarlo... passo per passo... quando sarò sicuro del risultato finale potrò utilizzare anche delle scorciatoie... è il mio modo di fare debug...

Grazie a dizionario per l'intervento...