Requete sur champ Date

Version imprimable

Bonjours à tous,

J'ai une application de gestion, je fait une requette SQL pour sélectionner des enregistement :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
 
 
  String Req ;
  Word Year, Month, Day ;
  DecodeDate(Fm_Choisir_Date -> MonthCalendar1 -> Date, Year, Month, Day);
 
  Req = "Select * from Incidents where MONTH(Incidents.Date)=" + IntToStr(Month) + "\nAND " +
                                        "DAY(Incidents.Date)=" + IntToStr(Day) + "\nAND " +
                                        "YEAR(Incidents.Date)=" + IntToStr(Year) ;
  DataModule1 -> Rapport_Journalier -> SQL -> Clear() ;
  DataModule1 -> Rapport_Journalier -> SQL -> Add(Req) ;
  DataModule1 -> Rapport_Journalier -> Open() ;

ça marche bien,

mais quand j'utilise le code suivant pour une requette entre deux dates, il nya pas de résultat.

Code:

1
2
3
4
5
6
7
8
9
10
11
 
  String Req,d1,d2 ;
  d1 = FormatDateTime("MM/DD/YYYY",Fm_Choisir_Deux_Date -> MonthCalendar1 -> Date) ;
  d2 = FormatDateTime("MM/DD/YYYY",Fm_Choisir_Deux_Date -> MonthCalendar2 -> Date);
  Req = "Select * from Incidents where Incidents.Date between #" +
         d1 +"# and #" +
         d2 +"#" ;
 
  DataModule1 -> Rapport_Journalier -> SQL -> Clear() ;
  DataModule1 -> Rapport_Journalier -> SQL -> Add(Req) ;
  DataModule1 -> Rapport_Journalier -> Open() ;

Pouvez-vous m'aider à résoudre ce problème.

@+;)

30/10/2006, 08h10
bakaneko

Tu peux me dire pourquoi tu fais un ExecSQL après un Open???
30/10/2006, 08h25
kmaniche

Bonjour,

Désolé, j'ai oublié de mettre cette ligne en comentaires. Maintenant c'est corrigé.

Q: POURQUOI Y A T'IL SI DE PROBLEME AVEC DES REQUETTES SUR DES CHAMPS DATE

@+;)
30/10/2006, 11h13
kurkaine
Ta requête fonctionne bien chez moi. Je récupère bien ce dont j'ai besoin. Au niveau SQL, je ne crois pas que t'es un souci. Essaie de voir autour, c'est à dire de vérifier directement sous ton sgbd (access, mysql, etc.) que ta requête renvoie bien des réultats. Si c'est le cas, je ne sais pas trop, vérifie que tu as bien des bonnes valeurs dans d1 et d2, ou utilise des types AnsiString... Mais sous ma base access, ce type de requête fonctionne sans souci.

Je fais plus simplement :
Code:

1 2 3 4 5 Query->Active = false; Query->SQL->Clear(); Query->SQL->Add(req); Query->Active = true;
Essaie aussi d'écrire la requête directement dans une AnsiString en mettant des dates à la mains (c'est à dire sans utiliser les fonctions FormatDateTime, mais #01/01/2005# par exemple).

Bon courage
31/10/2006, 08h25
kmaniche

Bonjour,

Oui maintenant ça marche.

Merci.

@+;)
31/10/2006, 10h38
kurkaine

N'oublie pas de mettre le tag :resolu: