Discussion :

[Jean-Luc80]

Bonjour
J'ai créé cette requête suivante

Code :

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

1
2
3
SELECT Acteurs.Acteur1, Acteurs.N°
FROM Acteurs
WHERE (((Acteurs.Naissance)<[Formulaires]![Acteurs sans date]![DateNaissance]) AND ((Acteurs.Mort) Is Null));

A l'exécution j'ai une erreur trop peu de parametres ....
Par contre si je remplace [Formulaires]![Acteurs sans date]![DateNaissance]
par un nombre ça fonctionne
Quelle est la syntaxe exacte ?
Merci

[Sefrou]

C'est peut-être parce que date est un mot réservé. Essaie de changer le nom de ton contrôle :ActeurSansDate

[Invité]

Bonjour

@ Sefrou

Date est entre crochet, cela n'a aucune incidence.

@ Jean-Luc80

Ton champ Naissance est de quel type ? Qu'est-ce que c'est ?
Ta requête tu l'exécutes tel quel où dans du code VBA ?

Philippe

[Jean-Luc80]

Bonsoir
J'ai trouvé une autre méthode en utilisant ce code

Code :

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

1
2
3
4
5
Dim db As DAO.Database, qdf As DAO.QueryDef, rs As DAO.Recordset
Set db = CurrentDb
Set qdf = db.QueryDefs("Acteurs Liste")
qdf.Parameters("[Formulaires]![Acteurs sans date]![DateNaissance]") = Forms("Acteurs sans date").[DateNaissance]
Set rs = qdf.OpenRecordset()

etc .....

Merci quand même

[loufab]

Bonjour,

Comme ceci.

Code :

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

1
2
3
4
PARAMETERS [Formulaires]![Acteurs sans date]![DateNaissance] DateTime;
SELECT Acteurs.Acteur1, Acteurs.[N°]
FROM Acteurs
WHERE (((Acteurs.Naissance)<[Formulaires]![Acteurs sans date]![DateNaissance]) AND ((Acteurs.Mort) Is Null));