faire une cumul par ligne dans une table access avec du codeRésolu

Question

bjr
je souhaite faire une somme cumulée dans un table access, par du code vb6.
exemple:
col.1   CUMUL
2.00    2.00
1.30    3.30
1.00    4.30
la col.1 est une saisie ds un form avec validation, la col.cumul sera donc le cumul recalculé apres validation et enregistré dans la base .

lorsque j'écris:
With ADOREST
    
    For x = 1 To NbrEnreg
            y = y + .Fields(2)
    Next
End With

il ne me prend que la premiere ligne, et donc si il y a 3 lignes il les aditionne trois fois.....
x s'incremente bien a chaque next, mais .fields(2) qui correspond a la col.,
que je souhaite se cumuler, reste tjrs sur cette premiere ligne....

quelqu'un peut'il maider.....

merci d'avance 
patrik

cs_DARKSIDIOUS · Accepted Answer

enlève le .recordset alors. _ Avant de poster dans le forum, prière d'aller lire ceci : http://www.codes-sources.com/reglement.aspx

cs_DARKSIDIOUS · Answer

Il faut te déplacer dans tes enregistrements, là tu ne fait que cumuler la même valeur : With ADOREST While not (.Recordset.EOF) y = y + .Fields(2) .Recordset.MoveNext Wend End With _ Avant de poster dans le forum, prière d'aller lire ceci : http://www.codes-sources.com/reglement.aspx

ecranbleu27 · Answer

merci
mais le ".recordset " il a pas aimé;
il me dit "méthode ou membre de donnée introuvable"
ADOREST est :
  Set adoSort = New adodb.Recordset
  Set adoSort = ADOREST

ecranbleu27 · Answer

merci beaucoup

Faire une cumul par ligne dans une table access avec du code

4 réponses

Votre réponse

Discussions similaires