Erreur de syntaxe dans clause where

bonsoir,

j'obtiens l'erreur suivante : "Erreur de syntaxe près de 'where bon.datelivraison = '2007-11-28'' à la ligne 4.

Voici mon code :

Code:

---

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

AnsiString format = "yyyy-mm-dd"; AnsiString s = NFeuilleRoute->DateTimePicker1->Date.FormatString(format); Query1->Close() ; Query1->SQL->Clear() ; Query1->SQL->Add("select bon.refbon, bon.datelivraison, bon.refclient, client.nomclient, client.cpclient, client.villeclient") ; Query1->SQL->Add("from client INNER JOIN bon ON client.refclient = bon.refclient") ; Query1->SQL->Add("order by refbon ASC") ; Query1->SQL->Add("where bon.datelivraison = :datelivraison") ; Query1->ParamByName("datelivraison")->AsString = s; Query1->Prepare(); Query1->Open() ;

---

Quelqu'un aurait-il une suggestion ?

merci,

1. ORDER BY se trouve toujours APRES une clause WHERE
2. Il faut des espaces à la fin de chaque ligne que tu ajoutes parce que la méthode Add de ton TStrings ( Query::SQL ) ne le fait pas elle-même. Elle ne fait que concaténer tes chaines de caractères pour former ta requête SQL.

exemple:

Code:

---

1 2 3 4 5

query->SQL->Clear(); query->SQL->Add("SELECT * "); query->SQL->Add("FROM TABLE "); query->Active = true;

---

Pour ma part, j'utilise la property Text pour être certains du contenu.

Code:

---

1 2 3 4 5 6

query->SQL->Text = "select bon.refbon, bon.datelivraison, bon.refclient, client.nomclient, client.cpclient, client.villeclient " "from client INNER JOIN bon ON client.refclient = bon.refclient " "where bon.datelivraison = :datelivraison order by refbon ASC"; Query1->ParamByName("datelivraison")->AsString = s;

---

évidemment ..... je pense à tout sauf à cela.

merci et bonne soirée.