Discussion :

[souminet]

Bonjour à tous,
Voilà, j'aurais besoin d'implémenter une requête SQL qui aurait pour résultat:

Tous les enregistrements de Ma table : Appel.DB Dont la Date de parution serait comprise entre deux dates.

La table est de Typearadox.
Les deux dates en question sont saisies à travers 2 TDateTimePicker.

J'ai un soucis avec les opérateurs que je peux utiliser, car la condition serait:
Where Date_Parution ≤DateTimePicker1.Date et Date_Parution ≥DateTimePicker2.Date
C'est à dire que les 2 dates choisies douvent impérativement être comprise dans l'interval
J'ai aussi le problème des formats...
Quand les dates sont saisies dans la TAble à travers des DBedits elles ont le format suivant: jj/mm/aaaa (J'ai appliqué un Mask de saisie)
danc ce cas, le problème du format de: jj/mm/aaaa et aaaa/mm/jj se pose t'il???

Merci+++++

[ShaiLeTroll]

VOIR ICI

Code :

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

Query.SQL.Text := Format(' ... CHAMP_DATE = CAST("%s" as DATE) ...', [FormatDateTime('DD/MM/YYYY', DateTimePicker1.Date)])

La syntaxe CAST est conforme au SQL92

Sinon voir aussi avec ParamByName ...

[souminet]

Merci+++
Mais j'ai pas trés bien saisi comment insérer ton code dans le mien
J'ai pour exemple, ce petit bout de code qui marche trés bien lors de la selection du Champs Type:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
procedure TFConsultationApp.suiButton2Click(Sender: TObject);
 Var
VType,:String;
 
begin
   VType:=ComboBType.Text;
   Datamodule3.QueryApp.SQL.Clear;
   Datamodule3.QueryApp.SQL.ADD('SELECT * FROM "Appel.DB"');
   Datamodule3.QueryApp.SQL.ADD('WHERE Type LIKE :ParamType');
   DataModule3.QueryApp.Params[0].AsString := VType;
   Datamodule3.QueryApp.Active:=true;
   EdResult.Text:=Inttostr(Datamodule3.QueryApp.recordcount);
end;

Pour les dates, j'utiliserais alors : ParamDatSup et ParamDatInf

Comment integrer le tout alors???

[SergioMaster]

sous paradox BETWEEN fonctionne pour les dates , voici un exemple
ou (DD)DateDébut == Date inférieure et (DF) DateFin == Date Supérieure

Code :

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

1
2
3
4
5
6
7
8
9
10
11
with Query1 do
  begin
    Close;
    SQL.Clear;
     SQL.Add('SELECT * FROM TEST');
    SQL.Add('WHERE  Date_L BETWEEN :D AND :F');
    ParamByName('D').asDate:=DD;
    ParamByName('F').asDate:=DF;
    Prepare;
    Open;
  end;

l'avantage de passer par les paramètres est que le format est géré par BDE ?

toutefois je suis comme 'Trollmignon' jusqu'a présent j'avais toujours préféré utiliser les CAST(s) maintenant ... je suis moins sur , surtout que je viens de lire (merci @SQLPRO) qu'il valait mieux privilégié BETWEEN qu'un test >= AND <=

[ShaiLeTroll]

Euh, rien n'empêche de mettre, du moins je pense ...

Code :

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

WHERE  Date_L BETWEEN CAST("%s" as DATE) AND CAST("%s" as DATE)

Mais les ParamByName, c'est très bien, cela fonctionne aussi pour les relations avec un MasterSource

[Franck SORIANO]

Avec Paradox, tu auras de meilleurs performances si tu utilises un TTable avec un index sur le champ Date et que tu fais un SetRange.

Sinon pour les requêtes avec les dates, moi c'est toujours requête paramétrée. Tu ne peux jamais être sûr du format des dates attendu par le SGBD car ce dernier peut être configuré utilisateur par utilisateur...
SQLServer possède cependant un format de date universelle ('TTTTMMDD') qui est toujours compris par le SGBD. Avec Oracle tu peux faire un TO_DATE et préciser le format de la date.
Cependant ça reste se prendre la tête pour rien car avec une requête paramétrée le problème est réglé...