Discussion :

[jncoffy]

Bonjour

Dans un formulaire lié à une table fournisseur, je souhaite, à la fermeture de ce formulaire (évènement close), modifier par code la valeur d'un champ de la table. Ce champ se nomme FactureEtablie et est de type VraixFaux.

j'ai le code suivant

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub Form_Close()
        If (FactureEtablie = False) Then
        FactureEtablie = True
        DoCmd.OpenQuery "aRCHIVEfACTURE", acNormal, acEdit
        Beep
        MsgBox "La facture est archivée", vbInformation, "Archivage"
        End If
 
        If (FactureEtablie = True) Then
            Beep
            MsgBox "Cette facture est déjà établie", vbCritical, ""
        End If
End Sub

A l'exécution, un message d'erreur s'affiche sur la ligne FactureEtablie=True

Quelqu'un sait-il comment modifier par code le contenu du champ FactureEtablie ?

Merci d'avance

Jean Noël

[Shoryu]

Salut
quelle est l'erreur retournée?

sinon pour modifier la valeur d'un champ d'une table passe par une requête SQL

Code :

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

1
2
3
4
 
'DoCmd.SetWarnings False
DoCmd.RunSQL "UPDATE tatable SET FactureEtablie=true WHERE critere=valeur"
'DoCmd.SetWarnings True

enleve les ' si tu veux qu'il ne te demande pas une confirmation

[jncoffy]

merci Shoryu pour ton aide

J'ai trouvé d'où venait le problème. Il suffisait en fait que je place ma procédure dans l'évènement Sur libération de mon formulaire au lieu de la placer dans l'évènement Sur Fermeture.

Je note cependant ta syntaxe SQL