Discussion :

[wushu29]

Bonjour à tous ( et meilleurs vœux),

J'ai un petit soucis sur une requête visant à copier les données d'une table dans une table temporaire avant mise à jour d'un enregistrement, le message suivant me parvenant sur réalisation de l'évènement:
La requête doit être construite à partir d'au moins une table ou une requête source. (Erreur 3067)

Voici le code:

Code :

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

1
2
3
4
5
6
7
8
9
10
Private Sub Form_BeforeUpdate(Cancel As Integer)
Dim sqla As String 'Copie des éléments de scolarité avant modification
    sqla = "INSERT INTO Temp_journal_even ( id_eleve, id_sco, id_annee_scolaire, id_etab, date_even, id_type_even, id_nature_even )" & _
    "SELECT Table_scolarite.id_eleve, Table_scolarite.id_sco, Table_scolarite.id_annee_scolaire, Table_scolarite.id_etab, Now() AS Expr1, 1 AS Expr2, 2 AS Expr3" & _
    "FROM Table_scolarite WHERE (((Table_scolarite.id_sco)=" & Form_SForm_sco.num_sco & "));"
 
 DoCmd.SetWarnings True
DoCmd.RunSQL sqla
 
End Sub

En vous remerciant par avance pour votre aide bienveillante,

Cordialement,

[Kloun]

Bonjour,

Il faudrait rajout un espace après le Expr3 (qui peut d'ailleurs être supprimé).

[wushu29]

Bonjour Kloun,

Merci bien ça marche au poil ( à l'espace devrais-je dire).

Bien cordialement,