Discussion :

[YOUSSEFALAOUIA]

Bonjour,
Dans une table Note_Eleves (Id_Eleve,Num_Exam,Note_Eleve)
Dans le champ Note_Eleve on saisit les notes des élèves , cette note (N de 1 à 20) soit N soit N.25 soit N.50 soit N.75
Pour un premier contrôle je veux exécuter une requête avec un critère qui extrait les fautes de frappe (soit toute Note différente de N ou N.25 ou N.50 ou N.75)
Cordialement.

[micniv]

dans le form de saisie de la note, dans le controle Note, par exemple, (champ numérique), dans l'evenement >Note_beforeUpdate tu peux faire la vérification

Code :

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

1
2
3
4
5
6
7
8
9
 
private sub Note_beforeUpdate(cancel as boolean)
if isnumeric(me.note) then
if me.note * 100 mod 25 <> 0 then
' si me.note * 100 n'est pas divisible par 25 
msgbox (" la partie décimale ne peut être .0 , .25 , .50 ou .75" , vbinformation, " Corrigez la saisie"
Cancel = true
 exit sub
end if

[YOUSSEFALAOUIA]

Bonjour,
Un très grand Merci pour votre réponse Monsieur micniv mais je tien à vous informer que la saisie se fait dans un autre département et que je reçois la base de données table Note_Eleves bien saisit et que mon rôle est de recevoir et traiter les réclamations des élèves. Donc je dois révéler les anomalies de saisie préalablement à partir de cette table via la requête dont j'ai parler.

[micniv]

alors vous pouvez trouver facilement les anomalies de saisies de notes par la requete
' table Note_Eleves (Id_Eleve,Num_Exam,Note_Eleve)

Code :

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

1
2
SELECT * FROM Note_Eleves WHERE (Note_Eleve * 100 MOD 25) <>  0
' MOD : opérateur Modulo (=reste de la division par 25)

[YOUSSEFALAOUIA]

bonjour,
Merci infiniment Monsieur micniv
c'est précisément ce que je cherche.