Bonjour,
j'ai une requête qui liste un certain nombre de tuples dans un formulaire liste. Dans mon formulaire, j'ai ajouté un bouton avec procédure événementielle. Le bouton apparait à la fin de chaque ligne. Voici le code du bouton:
Lorsque je clic sur le bouton, j'aimerais mettre à jour le champ "Credit" de la table "Hotesses", MAIS pour l'hotesse concernernée (voir clause WHERE).
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 Private Sub ajout_credit_Click() Dim db As DAO.Database Set db = DBEngine.OpenDatabase("C:\deesse\deesseData.mdb") ' Exécution de la requête db.Execute "Update Hotesses Set Credit = Credit + ('" & Screen.ActiveForm!ztPourcentage.Value & "') WHERE [NUMERO] = " & Screen.ActiveForm!ztNum_Hotesse.Value & ";" Debug.Print "Records Affected = " & db.RecordsAffected db.Close MsgBox "La somme a été portée au crédit de l'hôtesse", vbOKOnly + vbInformation, "Deesse - SAV" End Sub
Le probleme ici, c'est que ce code met à jour le tuple de la première ligne, même si je clic sur le bouton qui se trouve à la ligne 10 par exemple.
Comme faire donc pour que le bouton qui est à la fin de la ligne prenne les données de la zone de texte de la ligne concernée (Screen.ActiveForm!ztPourcentage.Value) pas celui de la première?
Merci de vos propositions.
skeut.
Partager