Discussion :

[stan314]

salut tout le monde,

je voudrais ecrire correctement la requete suivante en vba :

Code :

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

1
2
3
 
Rsql = " SELECT DISTINCTROW [NUMÉRO_JOUR],[DATE_DE_DÉBUT], [TYPE_JOUR],[BLOQUANT] FROM RESERVATION "
Rsql = Rsql & " WHERE [DATE_DE_DÉBUT]= me.TxtDate   ,[BLOQUANT]= true ,[DATE_DE_FIN]= 0 ";"

en sachant que date_de_debut est de type date, bloquant est un booléen et
le champ date_de_fin ne doit rien avoir

merci d'avance de votre reponse

stan314

[philben]

Bonjour,

essayer avec ceci, peut-être :

Code :

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

1
2
3
4
5
6
 
 
Rsql = "SELECT DISTINCT numéro_jour, date_de_début, bloquant, type_jour " & _
      "FROM reservation WHERE date_de_fin Is Null " & _
      "GROUP BY numéro_jour, date_de_début, bloquant, type_jour " & _
      "HAVING date_de_début=" & Format(Me.txtdate, "\#m-d-yy\#") & " AND bloquant=" & CInt(true)

Vérifiez que l'utilisation de <DISTINCT> correspond bien à ce que vous voulez faire...

[stan314]

salut tout le monde,

j'ai un probleme lorsque j'execute cette requete :

Code :

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

1
2
3
4
 
Rsql = "SELECT DISTINCT numéro_jour, date_de_début, bloquant  " & _
      "FROM RESERVATION WHERE [DATE_DE_FIN] Is Null " & _
      "[DATE_DE_DÉBUT]= " & Format(Me.TxtDate, "\#m-d-yy\#") & " AND [BLOQUANT]= " & CInt(True)

Le compilateur me marque erreur de synthaxe (operateur absent)..
est ce que quelqu'un pourrait m'aide a ce sujet ?
Merci d'avance

stan314

[temar]

Il te manque un AND juste avant [Date_De_Debut]

[Demco]

Un tutoriel est dédié à ce genre de problème, je t'en conseille la lecture.

En espérant t'aider.

[stan314]

Merci a tous pour vos reponse,

mais je n'arrive toujours pas a éxecutet la requete il me marque toujours une erreur comme quoi il me manque un paramatre..

Maintenant j'ai cette requete :

Code :

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

1
2
3
4
5
 
 
Rsql = "SELECT DISTINCT [NUMÉRO_JOUR], [DATE_DE_DÉBUT],[BLOQUANT], [DATE_FIN]  " & _
      "FROM JOUR_SPECIAL WHERE [DATE_DE_FIN] is null " & _
      " and [DATE_DE_DÉBUT]= " & Me.TxtDate & " and [BLOQUANT]= " & CInt(True)

Merci encore a tous pour votre aide

stan314

[temar]

Salut !

Avant d'éxécuter ta requete, affiche la dans un msgbox, pour voir si elle contient bien ce que tu crois qu'elle contient.

Par exemple, je pense qu'il manque quelque chose dans

Code :

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

 and [DATE_DE_DÉBUT]= " & Me.TxtDate

=> les dates se mettent entre # dans une requête SQL (et en format anglais me semble-t-il)

Bon courage

[philben]

Tu n'aimes pas les Group By et les HAVING ?
Pourquoi les avoir enlevés de ma requête ?

[Tofalu]

Quelle erreur ? Demco a donné un lien vers le debuggage. Apparement son conseil n'a pas été suivi puisqu'on ne sait toujours pas quelle requête est exécutée.

[temar]

Quelle erreur ? Demco a donné un lien vers le debuggage. Apparement son conseil n'a pas été suivi puisqu'on ne sait toujours pas quelle requête est exécutée.

Avant d'éxécuter ta requete, affiche la dans un msgbox, pour voir si elle contient bien ce que tu crois qu'elle contient.

Le conseil n'a pas été vu deux fois de suite alors