Discussion :

[gui-llaume]

bonjour,

je fais du code pour executer une requete.

A priori j'ai un pb de syntaxe dans la requete sql en rouge. Pourriez vous m'aider sur ce point ?
j'ai mis le format de date facon US car il m'a semblé qu'il fallait le faire mais je suis pas sur ...

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
Private Sub cmd_annul_edit_Click()

' annulation de l'édition du champ date.
Dim dateannulationedition As String

If Me.dateannulationedition.Value <> "Null" Then

    dateannulationedition = Me.dateannulationedition.Value
        If msgbox("Etes-vous sûr de vouloir annuler les editions du  " & dateannulationedition & " ? ", _
                vbYesNo + vbQuestion, "Demande de confirmation") = vbNo Then
           Exit Sub
        End If
    
    DoCmd.RunSQL ("UPDATE contrat, annexe SET dateenvoicontrat = null dateenvoiannexe = Null " & _
                  " where dateenvoicontrat = #" & Format(dateannulationedition, "mm/dd/yyyy") & "# and dateenvoiannexe = #" & Format(dateannulationedition, "mm/dd/yyyy") & "# ;")End If

End Sub

[Mahefasoa]

Bonjour,

Pour séparer les champs dans une requête UPDATE, il faut utiliser la virgule comme ceci:

Code :

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

1
2
 
UPDATE table SET champ1=valeur,champ2=valeur,champ3=valeur ...

Bon courage et @+

[gui-llaume]

Bonjour,

Pour séparer les champs dans une requête UPDATE, il faut utiliser la virgule comme ceci:

Code :

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

1
2
 
UPDATE table SET champ1=valeur,champ2=valeur,champ3=valeur ...

Bon courage et @+

une simple virgule vous manque et tout est dépeuplé ...
merci pour ta vista Mahefasoa
bonne journée