Discussion :

[SYNEQUANON]

Bonjour. Je suis nouveau dans access et VBA et je developpe une application pour la gestion des notes des etudiants dans une université. au moment de la délibération, je veux que tous les étudiants qui n'ont pas de note aient la note zéro. Je fais l'insertion des "zéro" lorsque l'on passe à la délibération. Voilà mon code

Code :

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

 DoCmd.RunSQL ("INSERT INTO notes(etudiant, session, ue, note) VALUES(" & rcs2.Fields(0) & "," & Me.filtreSession & "," & idUE & ", 0 );")

Si je fais l'insertion sans le champ note, ça marche parfaitement. Par contre avec le champ note, ça me renvoie erreur 3134. Il faut noté aussi que mon champ note est de type réel simple.

[madefemere]

Bonjour,

Essaie de faire un Debug.Print pour vérifier ce que te sort ta requête SQL :

Code :

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

Debug.Print ("INSERT INTO notes(etudiant, session, ue, note) VALUES(" & rcs2.Fields(0) & "," & Me.filtreSession & "," & idUE & ", 0 );")

Il ne devrait pas y avoir un espace entre VALUES et la parenthèse ouvrante ?

Cordialement,

[SYNEQUANON]

J'ai essayé le code que tu m'as proposé mais ça ne fait rien. Le message d'erreur ne s'affiche plus, mais la ligne n'est pas ajoutée à ma table. J'ai mis l'espace entre VALUES et la parenthèse mais ça n'a rien changé.

[Gado2600]

Bonjour,

Le debug.Print ne sert pas à "exécuter du code"... Il sert à afficher le contenu de variables par exemple, dans ta fenêtre d'exécution (ctrl+g pour l'afficher).

Quand à ta requête, mets des apostrophes autour de chacune de tes valeurs. Je pense que cela vient de là.

Cordialement,

[SYNEQUANON]

J'ai essayé les apostrophes mais la même erreur s'affiche. Je pensais à une solution alternative: créer une requête d'ajout paramétrée et l’appeler dans mon code VBA en donnant des valeurs aux paramètres. Malheureusement je ne sais pas trop comment implémenter ça

[madefemere]

Bonsoir,

En mettant le Debug.print, Qu'est-ce qui est affiché dans la fenêtre d'exécution de ton éditeur VBA?

[SYNEQUANON]

Bonsoir. Voici le code que le debug.print affiche:

Code :

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

INSERT INTO notes(etudiant, session, ue, note) VALUES(3,1,32, 0 );

Mais dans la table notes, le 0 ne s'affiche pas.

[dumas.blr]

Bonjour SYNEQUANON,

As-tu essayé de convertir ton zéro en réel, par une fonction cdec ou cdbl ?

[madefemere]

Bonjour,

C'est le secret d'Access, de VBA et de SQL. Le mot "note" est a priori un mot réservé.
Change ton nom de champ et ça devrait marcher.


Cordialement,

[dumas.blr]

oupsss ! merci pour ton œil d'aigle Madefemere ! Je n'avais pas percuté avec le nom du champ !

[madefemere]

Bonjour dumas.blr,

Je ne vole pas encore, mais ça viendra .
En fait, la syntaxe était bonne et j'étais initialement moi-même étonné que ça ne marchait pas.
J'étais prêt à lui demander de poster la base mais, j'ai fait une configuration simple et ...

Bonne continuation

[SYNEQUANON]

Bonjour, J'ai changé le nom du champ 'note' et ça marche maintenant. Merci à tous pour votre aide