Discussion :

[sangdragon]

Bonjour,

Sous ACCESS2000,

J'ai actuellement un formulaire de saisie pour ajouter des enregistrements à une table T. Ce formulaire contient une zone de liste modifiable, ZLM qui permet d'affecter une valeur à un champ.

Le contenu initial de ZLM provient d'une table A. Quand l'utilisateur clique sur enregistrer, je voudrais :
vérifier si la valeur de ZLM est un element de la table A.
si ce n'est pas le cas, ajouter cette valeur à la table A de maniere transparente pour l'utilisateur (pas de message d'alerte)

Merci d'avance

SD

[stigma]

Sous Access 2003 mais c'est pareil pour toi, voici un bout de code :

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
Private Sub cbo_Service_NotInList(NewData As String, Response As Integer)
 
    '------------------------  Limiter à liste = Oui
 
    If MsgBox("Voulez-vous ajouter ce service dans la liste ?", vbQuestion + vbYesNo, _
    "NOUVEAU SERVICE") = vbYes Then
        Set Rst = db.OpenRecordset("Services")
        With Rst
            .AddNew
            .Fields("Service_Nom") = UCase(NewData)
            .Update
            .Close
        End With
        Call SourceService '-----------------  Recharger la liste
        Response = acDataErrAdded
    Else
        Me.cbo_Service = Null
        Response = acDataErrContinue
    End If
 
End Sub

[sangdragon]

merci Stigma !

désolé j'avais pas vu ta reponse (j'pensais recevoir un mail d'avertissement )

je vais tester ca de suite !