Discussion :

[saada1978]

VOICI TOUS QUI J'AI ESSAYE

Code :

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

1
2
3
4
5
 
SELECT Dabse
FROM absence
where Dabse between cast ( " maskedit2.text " ) as
date and cast('maskedit1.text') as date

Code :

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

1
2
3
4
5
 
SELECT Dabse
FROM absence
where cast (Dabse as date) 
between cast ( " maskedit2.text " ) as date and 'maskedit1.text'

Code :

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

1
2
3
4
5
 
SELECT Dabse
FROM absence
where cast ( "Dabse" as date) between cast( " maskedit2.text " )as date
and 'maskedit1.text'

Code :

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

1
2
3
4
 
SELECT Dabse
FROM absence
where abse <= cast (maskedit1 as date) {resultat rien}

Code :

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

1
2
3
4
 
SELECT Dabse 
FROM absence 
where Dabse > cast ( ''maskedit1'' as date);

{resultat =tous les données du champ dabse sont affichées,c'est faux la condition (>)n'est pas prise en compte meme resultat s'affiche deux edits ou maskedits
le champ dabse est de type DATE
AIDER MOI

[Mirmillon]

bonjour
tu devrais donner d'autres renseignements come par exemble ton SGBD tu es sur que tu poses ta question sur le bon forum ?

[Mirmillon]

Bonjour
1. la fonction cast s'écrit comme ca

Code :

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

1
2
3
 
cast ( " maskedit2.text " as
date)

et non pas

Code :

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

1
2
3
 
( " maskedit2.text ") as
date)

2. Fais attention car dans ta requete tu mets des doubles quotes et des singles quotes
3 On met dans la requete les noms des champs et non pas les noms des composants Delphi
4. si tu veux convertir convertis directment par Delphi comme par exemple

Code :

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

1
2
3
4
5
6
7
8
9
10
 
Var
D1, D2 : TDate
Begin 
D1 := StrToDate(maskedit2.text);
D2 := StrToDate(maskedit&.text);
puis tu fais ta requete 
SELECT Dabse
FROM absence
where Dabse between D1 and D2

bon courage
Mirmillon

[Giovanny Temgoua]

Messieurs, Merci de penser à utiliser la balise CODE (dans votre message, cliquer sur le symbole dièse (#) pour mettre la zone de code sélectionnée dans des balises codes)

Pour la comparaison des dates, pourquoi ne pas lire la FAQ ? :
http://delphi.developpez.com/faq/?pa...lcomparerdates

Le sondage était-il nécessaire ?

[Mirmillon]

bonjour
Si tu utilises Firebird tu dois mettre des points pour que Firebird interpréte la date comme un format DD/MM/YYYY voila une requete qui marche sur F1.5

Code :

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

1
2
3
select "ID_PERSONNE","PER_Nom", "PER_Surname", "PER_DateBirth", "PER_Epouse" from T_PERSONNE
WHERE
"PER_DateBirth" = '31.01.1914'

mirmillon

[Mirmillon]

Bonjour
cette requete là marche aussi

Code :

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

1
2
3
select "ID_PERSONNE","PER_Nom", "PER_Surname", "PER_DateBirth", "PER_Epouse" from T_PERSONNE
WHERE
"PER_DateBirth"  BETWEEN  '01.01.1914' AND '08.01.1954'

[Mirmillon]

Bonjour et voici la solutionavec F1.5 donc pas de transtypage

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
var
DT1 , DT2 : String;
begin
DT1 := Edit2.Text;
DT2 := Edit3.Text;
IBQuery1.Close;
IBQuery1.SQL.Clear;
IBQuery1.SQL.Add('select "ID_PERSONNE","PER_Nom", "PER_Surname", "PER_DateBirth", "PER_Epouse" from T_PERSONNE');
IBQuery1.SQL.Add('WHERE "PER_DateBirth" ' );
IBQuery1.SQL.Add(' BETWEEN ' + QuotedStr(DT1) +  ' AND ' + QuotedStr(DT2));
IBQuery1.Open;

mirmillon