bonjour, j'ai deux formulaire qui se joigne et donc qd je clique sur 1 client du 1e formulaire, il m'ouvre le 2 form avec l'achat correspondant a se client.
Dans le 2 e form il est possible de créer une nouvelle carte de fidélité.
Quand je le fait, il s'associe bien avec le client mais quand je coupe, et que je réouvre ma BD, le client est tjs la donc dans la 1e form et quand je vais voir sa carte, il ne retrouve plus les achat et tout les champs se mette a zero
Quel pourrait etre le probl:
Voici mon code qui est sur le bouton pour créer une nouvelle carte:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40 Private Sub btnNewCarte_Click() Dim maBD As DAO.Database Dim strSQL As String Dim newCarte As Long Dim numSaved As Long numSaved = Me.No_CF reponse = MsgBox("Confirmez-vous l'ajout d'une carte ?", vbYesNo + vbQuestion) If reponse = vbYes Then Set maBD = CurrentDb strSQL = "INSERT INTO T_carte (no_client) VALUES (" & Me.No_client & ")" maBD.Execute strSQL 'On récupère le no_CF qui vient d'être créé Me.Refresh newCarte = DMax("no_CF", "T_carte") strSQL = "INSERT INTO T_Achat (no_CF) VALUES (" & newCarte & ")" maBD.Execute strSQL Me.Requery DoCmd.GoToControl "No_CF" DoCmd.FindRecord numSaved Me.listeCF.SetFocus Me.Refresh MsgBox "Carte ajoutée" Me.Refresh Set maBD = Nothing End If
Partager