Discussion :

[Jsiorat]

Bonjour à toutes et tous

Cette instruction me renvoie l'erreur 3061 : Trop peu de paramètres. 1 attendu.
J'ai beau chercher ... je ne vois pas ou se trouve le paramètre manquant

Code :

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

1
2
3
4
5
6
 
strSQL = "INSERT INTO tblOperations (Date_Op, id_Cpte, id_Categorie, id_Tiers, id_ModePaiement)" _
                & "SELECT """ & dDate & """, " _
                & "tblEcheancier.id_Cpte, tblEcheancier.id_Categorie, tblEcheancier.id_Tiers, tblEcheancier.id_ModePaiement " _
                & "FROM tblEcheancier " _
                & "WHERE (((tblEcheancier.id_Ech) = [Forms]![Gestion de l'Echeancier]![txt_Id_Ech]))"

dDate est formaté comme ça :

Code :

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

1
2
Dim dDate as date
dDate = Me.txt_DateEch & "/" & Month(Now()) & "/" & Year(Now())

le but de cette instruction est de copier l'enregistrement affiché à l'écran dans la table tblOperations.

Merci de vos réponses.

[argyronet]

Bonjour,

Une date en SQL s'encapsule entre deux # et au format mm/dd/yyyy.

De plus et à proscrire, éviter les [Forms]![Nom de Form]![Nom de controle] dans les clauses SQL de manière générale.

Il vaut mieux faire un

Code :

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

INSERT INTO tablename (champs) VALUES (valeurs)

.

Et histoire de pinailler encore un peu, Me.txt_DateEch qui représente en toute apprence un jour devrait être nommé Me.txt_JourEch. Ca évite les difficultés de relecture et permet une compréhension du code, même pour vous plus tard (...).

Argy

[Jsiorat]

Et histoire de pinailler encore un peu, Me.txt_DateEch qui représente en toute apprence un jour devrait être nommé Me.txt_JourEch. Ca évite les difficultés de relecture et permet une compréhension du code, même pour vous plus tard (...).

Argy

Merci et effectivement, j'aurai du utiliser cette dénomination
Bonnes fêtes ...