Discussion :

[wachoo31]

Bonsoir à toutes et tous,

J'ai créé un fichier acces avec dans une table, les champs "NOM"-PRÉNOM"-"ADRESSE"-CODE POSTAL"-"ACTIVITÉ" avec le champ" CODE POSTAL lié a une autre table "CODE POSTAL-COMMUNE"et le champ"ACTIVITÉ" lié a une table"CODE ACTIVITÉ - DÉNOMINATION".
Pour le moment quand il y a un changement d'adresse, de commune ou d'activité pour une personne je l'inscrit dans un "champs mémo intitulé remarques afin d'avoir une trace du changement.
J'aurais voulu savoir comment faire pour pouvoir sauvegarder ces changements dans une table ou autre afin que quand je sélectionne une personne dans un formulaire, toutes les modifications en rapport avec cette personne apparaisse les une a la suite des autres mais je ne trouve pas la solution.

Je ne sais pas joindre mon fichier car il comporte plus de 1100 membres.

[Pierre Fauconnier]

Bonsoir

1. Mettre le code postal en clé primaire n'est pas une bonne idée, car il peut exister des entités différentes ayant le même code postal. Le choix de la clé primaire est primordial et est d'une importance capitale pour la suite du travail avec tes données.

2. Pour garder une trace des changements, je préconise de passer par un table intermédiaire dans laquelle tu auras, par exemple pour les activités, un champ vers la clé primaire des contacts, un champ vers la clé primaire des activités, un champ pour la date d'entrée et un pour la date de sortie. Les enregistrements sans date de sortie représentent alors les activités actuelles. Il est alors aisé de matérialiser cela par un jeu de formulaire/sous-formulaire.

[f-leb]

s'lut,

en principe on fait ça avec des tables historiques:

avec CONTACT(idContact, nom, prenom, adresse,.....,#idActivité)

HISTOADRESSE(#idContact,DateHistoAdresse, adresseligne1, adresseligne2, cp,...)

HISTOACTIVITE(#idContact, DateHistoActivite,activité)

ou carrément

HISTOCONTACT(#idContact,DateHistoContact, nom, prenom, adresse,..,activité)

[wachoo31]

Bonsoir a vous deux,

Merci pour vos explications, je vais essayé de mettre cela en forme car je débute dans access.

[Arkham46]

bjr,

il y a aussi un tuto sur le sujet :
Stocker et Annuler les mises à jour dans un formulaire

[naphta]

Bonsoir,

Un bout de code trouvé il y a un moment de cela chez Microsoft
Ceci collecte tous les changements dans les contrôles texte et liste déroulante (on peut l'étendre) et le positionne dans un champ

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
 
Private Sub Form_BeforeUpdate(Cancel As Integer)
On Error GoTo captErreur
    Dim InfosMaj As String
    Dim LeCtrl As control
 
    ' Au cas où l'on veut savoir si un enregistrement a été ajouté
    '  If Me.NewRecord = True Then
    '      InfosMaj = InfosMaj + vbCrLf + "1 nouvel enregistrement a été ajouté"
    '  End If
 
' Passe en revue tous les champs pour connaitre les changements
For Each LeCtrl In Me.Controls
    Select Case LeCtrl.ControlType
        Case acTextBox, acComboBox
            If IIf(IsNull(LeCtrl.Value), "", LeCtrl.Value) <> LeCtrl.OldValue Then
                InfosMaj = InfosMaj + vbCrLf + "Valeur champ " + LeCtrl.Name + " : " + Format(LeCtrl.OldValue) + " - remplacée par : " & Format(LeCtrl.Value)
            End If
        End Select
Next LeCtrl
 
'Mise à jour du champs traceur de modifications
 
If InfosMaj <> "" And Not IsNull(InfosMaj) Then
 
    Forms!Monformulaire!lechampMemo = InfosMaj
 
End If
 
degage:
    Exit Function
 
captErreur:
    If err.Number <> 64535 Then
        MsgBox "Erreur N°: " & err.Number & vbCrLf & "Description: " & err.Description
    End If
    Resume degage
End Function

a+

[wachoo31]

Bonjour naphta, Re les autres

Merci pour le cadeau, je vais essayé de le mettre en pratique
bon week-end