Discussion :

[tibiurs]

Bonjour a tous,
J'ai un petit souci pour faire une opération mathématiques de base
j'ai creer un recordset pour parcourir une table et je veux faire une addition sur la valeur d'un champ et la valeur d'une zone de texte d'un formulaire
Le resultat doit aller dans le champ initial .
Tout ceci avec une requete update
Voici le code ecrit

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
            tampon = oRst.Fields("conges pris").Value
            retampon = conges_pris + tampon
            'Passe en mode modification
            oRst.Edit
            'Affecte la nouvelle valeur
            oRst.Fields("conges pris").Value = retampon
            'Met à Jour
            oRst.Update

la variable conges_pris se trouve dans le formulaire
conges pris est dans la table

si je mets conges_pris = 10
et conges pris =10
Le resultat est de 1010
Donc erreur
J'avoue que je commence a ne plus avoir beaucoup de cheveux
Merci d'avance pour votre aide

[jaffael]

c'est parce qu'il te concatène des chaines de caractères.

tu peux essayer de typer tes variables (donc pas en Variant) ou d'utiliser des fonctions de conversion.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
   Dim tampon as Long, retampon as Long
            tampon = oRst.Fields("conges pris").Value
            retampon = CLng(conges_pris) + tampon
            'Passe en mode modification
            oRst.Edit
            'Affecte la nouvelle valeur
            oRst.Fields("conges pris").Value = retampon
            'Met à Jour
            oRst.Update

[tibiurs]

Merci ca marche
c'etait aussi simple que ca