Discussion :

[decour]

Bonjour,

Dans mon formulaire, une text box txt_date est renseignée par un calendrier pop up. Elle contient donc une date. (format short date)

à côté un bouton cmd_go permet de lancer une requête affichant une liste de résultats dans une liste lst_resultats.

J'ai inséré dans cette requete une condition sur la date rentrée dans ma txt_box. Mais la liste ne se remplit pas, la requête retourne un rsultata vide.

Pouvez vous vérifier le code et me dire si il y a une erreur?

Merci!!

Code :

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

1
2
3
4
5
6
7
8
Private Sub cmd_go_Click()
Dim SQL1 As String
Dim DatePresence As String
DatePresence = "#" & Me.txt_date & "#"
SQL1 = "SELECT [nom_cdc], [date], [lieu_matin],[action_matin], [lieu_aprem], [action_aprem], [Commentaires] WHERE [date]= DatePresence ORDER BY [date];"
Me.lst_presence.RowSource = SQL1
Me.lst_presence.Requery
End Sub

[Demco]

Bonjour,

Lorsque tu as ce genre de problème essaie de faire un :

Code :

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

Debug.Print "SELECT [nom_cdc], [date], [lieu_matin],[action_matin], [lieu_aprem], [action_aprem], [Commentaires] WHERE [date]= DatePresence ORDER BY [date];"

Ta requête s'inscrit alors dans la fenêtre d'exécution et tu vois de suite que el nom de ta variable apparait dans ton SQL ce qui n'est pas le résultat que tu attends.

En effet il faut faire une concaténation pour insérer la valeur d'une variable dans une chaîne de caractères grâce au caractère & :

Code :

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

Debug.Print "SELECT [nom_cdc], [date], [lieu_matin],[action_matin], [lieu_aprem], [action_aprem], [Commentaires] WHERE [date]= " & DatePresence & " ORDER BY [date];"

En espérant t'aider.

[decour]

SUPER!! ça a marché!!

Maintenant j'ai un autre souci:
sans requete ma liste affiche

03/01/2005 blabla
01/04/2005 blibli
26/10/2005 bloblo

Lorsque je rentre comme date 26/10/2005
la requête affcihe

26/10/2005 bloblo : ca marche (pensais-je...)

mais en rentrant comme date 03/01/2005

la liste n'affiche rien...

J'ai vu plusieurs fois que la date avait un format spécial (US vs FRance)

Comment faire sachant que cette date s'écrit automatiquement après avoir cliqué sur un petit calendrier en pop up?

Merci de votre aide!!!

[Invité]

Salut,

Je pense que cela vient du format, formate ta date au format US avec la commande format (mm/dd/yyyy)

Starec

[decour]

Ok, concrètement je mets où et comment le formatdate dans le process sachant que
1) en cliquant sur ma textbox j'appelle un calendrier
2) le clic sur le calendrier renseigne ma text box en format jj/mm/aaaa
3) un clic sur un bouton "go" lance la requete qui comporte la condition "where [date]=date de mon formulaire"
4) les eventuels resultats de la requête sont affichés dans une liste box

Merci de votre aide!!

[cafeine]

Hello,
Je t'invite à consulter mon tuto sur le débogage de requêtes, et notament la partie consacrée au Debug.Print.

http://cafeine.developpez.com/debugprint/

Sinon pour rester concrêt, cela semble est le classique cas de date au format US, cas qui est traité dans la FAQ.