[SQL] Différence de dates

Bonjour, :D

Je suis sous VB6 avec une base Access

Voici ma requête :

Code:

---

1 2 3 4 5 6

sSQL = "" sSQL = sSQL & "SELECT " & GrilleCibleArt sSQL = sSQL & "FROM Tireurs T, CibleArt A " sSQL = sSQL & "WHERE T.T_IdTireur = A.CA_IdTireur AND A.CA_Distance = '" & sDistance & "'" & " " sSQL = sSQL & "ORDER BY A.CA_Total DESC, A.CA_Cp1 DESC, A.CA_Cp2 DESC, A.CA_CP3 DESC, A.CA_Cp4 DESC, A.CA_Cp5 DESC, " & _ T_Categorie ASC, T.T_DateNaiss ASC"

---

J'aimerai si c'est possible mettre une condition dans la close OPRDER BY, du genre :

Si T_Categorie = 1 ou 2 alors TDateNaiss DESC et si T_Categorie = 3 ou 4 ou 5 alors T_DateNaiss ASC

Si oui comment ??

Merci d'avance
Fikou

Ca doit donner ça:

Code:

---

1 2 3 4 5

If T_Categorie = 1 Or T_Categorie = 2 Then sSQL = sSQL & "ORDER BY TDateNaiss DESC" Else sSQL = sSQL & "ORDER BY TDateNaiss DESC" End If

---

:D

Salut et merci rstephane

En fait la condition doit être dans la clause ORDER BY de la requête.

Se sont les résultat d'un concour, en cas d'égalité je dois trier d'abord les plus jeunes (adolescents, junior), les plus vieux et en dernier l'élite.

Les plus jeunes = DESC les plus vieux ASC

Je doit mettre le test dans la requete et pas à la construction de cette dernière

Fikou

Essaye :

Code:

---

1 2 3 4 5 6 7

SELECT * FROM laTable ORDER BY Categorie, CASE WHEN Categorie = 1 THEN DateNaissance - current_date ELSE current_date - DateNaissance END

---

current_date est la fonction standard qui renvoie la date du jour.

Merci Médiat

J'ai testé :

Code:

---

1 2 3

sSQL = sSQL & "ORDER BY T.T_Categorie, CASE WHEN T.T_Categorie = 1 THEN T.T_DateNaiss - CURRENT_DATE ELSE: CURRENT_DATE - T.TDateMaiss END "

---

Il me dit : la méthode open de l'objet à échoué

J'ai aussi simplifié :

Code:

---

sSQL = sSQL & "order by t.t_datenaiss - current_date"

---

Idem

Fikou

Est-ce que current_date est dispo avec access ?

Bonne question !!!

Je ne sais pas ou chercher la réponse mais je cherche :oops:

Fikou

J'ai trouvé pour Current_Date à marche pô pour access :oops:

http://sql.developpez.com/sqlaz/fonctions/

Fikou

Et tu as essayé NOW ?

Bonjour :D

J'ai essayé ça :

Code:

---

sSQL = sSQL & "order by t.t_datenaiss - NOW"

---

J'ai l'erreur : Type de donnée incompatible dans l'expression du critère
toutes mes dates sont au format "yyyy-mm-dd"
Fikou

Cherche dans la doc ACCESS comment on fait une différence de DATE, et comment on utilise NOW (est-ce qu'il faut mettre NOW() ? )

Re,

Je sèche, J'ai tout essayé :oops:

Effectivement dans un tuto il est dit de ne pas urilisé NOW() mais DATE()

Code:

---

1 2	ssql = ssql & "order by t.t_datenaiss - DATE()" ssql = ssql & "order by t.t_datenaiss - '#" & Format(Date, "mm.dd.yyyy") & "#"

---

ect.
J'ai une erreur de syntaxe

j'ai essayé de récuperer la date du sys dans une variable et de l'implémenter dans ma requête, rien de rien


Ca me gonfle je vais prendre l'air avec le chien, cela ira mieux au retour 8-) enfin j'espère

Fikou

Bonjour, :D

Si je fais un truc du genre :

Code:

---

1 2	aChaine = "ASC" "ORDER BY T.T_Categorie " & aChaine

---

Cela fonctionne
Il faudrai que je mette un test CASE WHEN dans la requete pour implementer ma variable. Mais je ne sais pas ou le mettre ce test SELECT ? WHERE ? ni comment.

J'ai essayé mais a marche pô :oops:

Fikou

Salut,
J'ai peut-être pas compris mais si tu veux faire une différence entre deux dates, il me semble qu'il y a la fonction DateDiff.
Sinon, pour convertir la date au bon format moi je fait :
"ToString("M/d/yyyy")"

C'est un problème de fonction et de formattage, intrinsèque au SGBD, je déplace sur le forum Access.