DateTimePicker avec sql

Salut,

Après avoir remplacer les combobox par des DateTimePicker, je recnontre des problèmes avec la base de donnée.
Erreur : Invalid relational operator.

Code:

---

1 2 3 4 5 6 7

Abonnement.Query_Abo.sql.Clear; Abonnement.Query_Abo.sql.Add('Select Nom, Prenom, Section, Parcelle, Ilot, Rang, Numpol, Clepol, dateateabo, Tar,DateSite from Abo'); Abonnement.Query_Abo.sql.Add('Where Dateabo between' + DateToStr(DateTimePicker2.Date))); Abonnement.Query_Abo.sql.Add('And ' + DateToStr(DateTimePicker3.Date))); Abonnement.Query_Abo.sql.Add('And expl = ' + QuotedStr(ExplEdit.text)); Abonnement.Query_Abo.sql.Add('order by dateabo'); Abonnement.Query_Abo.Open;

---

Essaies en mettant la condition relative à la date entre parenthèses.

il faut mettre année puis mois puis jours : comme ca :
Abonnement.Query_Abo.sql.Add('And '
+ formatdatetime('yyyy-mm-dd',DateTimePicker3.Date));

Bonjour,

Je mettrai la date plutôt comme ça :

Code:

---

1 2	FormatDateTime('mm/dd/yyyy',DateTimePicker3.Date))

---

Cordialement,
Mathieu

Passe par les paramètres ca regle beaucoup de problème avec les dates et pas besoin de connaitre sont format

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

With Abonnement.Query_Abo do begin sql.Clear; sql.Add('Select Nom, Prenom, Section, Parcelle, Ilot, Rang, Numpol, Clepol, dateateabo, Tar,DateSite from Abo'); sql.Add('Where (Dateabo between :DDEBUT And :DFIN)'); sql.Add('And expl = :EXPL'); sql.Add('order by dateabo'); paramcheck := true; parambyname('DDEBUT').Value := DateTimePicker2.Date; parambyname('DFIN').Value := DateTimePicker3.Date; parambyname('EXPL').value := ExplEdit.text; Open; end;

---

Salut à tous,

Merci pour vos interventions.
Toutes les excuses pour le silence un peu longt independant de ma volonté.
J'ai éssayé

Code:

---

FormatDateTime('mm/dd/yyyy',DateTimePicker3.Date))

---

et

Code:

---

formatdatetime('yyyy-mm-dd',DateTimePicker3.Date));

---

qui ne marche pas.
Enfin j'au utilisé

Code:

---

1 2 3 4 5 6 7 8 9 10

Abonnement.Query_Abo.sql.Clear; Abonnement.Query_Abo.sql.Add('Select Abobt_Nom, Abobt_Prenom, Abobt_Section, Abobt_Parcelle, Abobt_Ilot, Abobt_Rang, Abobt_Numpol#, Abobt_Clepol#, Abobt_Dateabo, Abobt_Tar, Abobt_DateSit from Gc.gc_Abonne'); Abonnement.Query_Abo.sql.Add('Where (Abobt_Dateabo between :DDEBUT And :DFIN)'); Abonnement.Query_Abo.sql.Add('And abobt_expl# = :EXPL'); Abonnement.Query_Abo.sql.Add('order by abobt_dateabo'); Abonnement.Query_Abo.ParamCheck := true; Abonnement.Query_Abo.parambyname('DDEBUT').Value := DateTimePicker2.Date; Abonnement.Query_Abo.parambyname('DFIN').Value := DateTimePicker3.Date; Abonnement.Query_Abo.parambyname('EXPL').value := ExplEdit.text; Abonnement.Query_Abo.Open;

---

Voici ce que oracle ramène comme erreur : 'inconsistent datatypyes'.

Code:

---

1 2	Abonnement.Query_Abo.sql.Add('And abobt_expl# = :EXPL');

---

A mon avis c'est le # qu'il doit pas aimer

Expl# le nom du champ.
La preuve est quand on enlève le # devant Expl, Oracle signale 'nom de colonne non valide'.

Salut,

Une alternative pourrait s'avérer efficace bien que moins portable (spécifique Oracle) :

Code:

---

1 2 3 4 5

Abonnement.Query_Abo.sql.Add('Where Dateabo between to_date(' + QuotedStr(FormatDateTime(DateTimePicker2.Date, 'dd/mm/yyyy')) + ', ' + QuotedStr('dd/mm/yyyy') + ')'; ...

---

C'est un peu plus fort que moi. Mais j'essaie de m'adapter.

Code:

---

1 2 3 4 5

Abonnement.Query_Abo.sql.Add('Select Abobt_Nom, Abobt_Prenom, Abobt_Section, Abobt_Parcelle, Abobt_Ilot, Abobt_Rang, Abobt_Numpol#, Abobt_Clepol#, Abobt_Dateabo, Abobt_Tar, Abobt_DateSit from Gc.gc_Abonne'); Abonnement.Query_Abo.sql.Add('Where abobt_expl# = ' + QuotedStr(ExplEdit.text)); Abonnement.Query_Abo.sql.Add('And Abobt_Dateabo between to_date('+ QuotedStr(FormatDateTime('mm/dd/yyyy', DateTimePicker2.Date))); Abonnement.Query_Abo.sql.Add('And to_date('+ QuotedStr(FormatDateTime('dd/mm/yyyy', DateTimePicker3.Date))); Abonnement.Query_Abo.sql.Add('order by abobt_dateabo');

---

L'erreur est : 'missing right parenthesis'.
Avec un peu d'aide je vais y arriver.

Le texte est pourtant simple, il te manque une parenthèse ) , vérifies ta requete

ça devrait donner qqch comme ça

Code:

---

1 2 3 4 5 6 7

Abonnement.Query_Abo.sql.Add('Where (Abobt_Dateabo between '); Abonnement.Query_Abo.sql.Add('to_date('+Quotedstr(formatdatetime('dd/mm/yyyy', now))+','+QuotedStr('dd/mm/yyyy')+')'); Abonnement.Query_Abo.sql.Add(' and '); Abonnement.Query_Abo.sql.Add('to_date('+Quotedstr(formatdatetime('dd/mm/yyyy', now))+','+QuotedStr('dd/mm/yyyy')+')'); Abonnement.Query_Abo.sql.Add(')'); Abonnement.Query_Abo.sql.Add('And abobt_expl# = '+...

---

en remplaçant now par tes datetimepicker.date

Merci de m'avoir emmené à l'école. C'est très instructif.
Merci encore à vous tous et à très bientôt.;)