Discussion :

[sondo]

Salut,

Je chercher dans ces lignes ou se trouve le guillemet de droit manquant signalé par delphi. J'ai chercher à tel enseigne d'avoir des maux de têtes. La requête marche bien sous SQL.

Code :

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

1
2
3
4
5
6
7
8
9
 
Form59.Query_Remb.sql.Clear;
Form59.Query_Remb.sql.Add('Select ''Remboursement frais médicaux à l''agent'' ||'' ''||agent.a_nom_prenom||'' ''||''suivant reçu médicale''||'' ''||''du''||'' ''||fiche.f_date_remb');
Form59.Query_Remb.sql.Add('||'' ''||''(''||fiche.f_montant||'' ''||''X''||'' ''||agent.a_charge||''%''||'' ''||''=''||'' ''||fiche.f_charge_sonabel||'')'' as f_libelle, fiche.f_date');
Form59.Query_Remb.sql.Add(', agent.a_cout, ''Arrêter la présente pièce de dépense à la somme de :  '' || translate_fr(to_word_en(f_charge_sonabel)) || ''  F CFA'' as f_text from agent, fiche');
Form59.Query_Remb.sql.Add('Where agent.a_matricule = ' + QuotedStr(Edit1.text));
Form59.Query_Remb.sql.Add('And fiche.a_matricule = ' + QuotedStr(Edit1.text));
Form59.Query_Remb.sql.Add('And fiche.f_date_remb = ' + QuotedStr(FormatDateTime('dd/mm/yyyy', DateTimePicker1.date)));
Form59.Query_Remb.Open;

Aider moi s'il vous plaît à retrouver le guillemet de droit manquant. Merci.

[Andnotor]

L apostrophe. Peut-être le quadruplé (pour en avoir plus que deux en SQL) :

Code :

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

''Remboursement frais médicaux à l''''agent''

[sat83]

Pour manipuler les chaîne SQL, il est bon d'utiliser QuotedStr, qui se charge d'ajouter les quote avant et après la chaine de caractère, mais également de doubler les cotes à l'intérieur.

[sondo]

Merci beaucoup; Vous m'avez tirer d'affaire. Je ne pouvais pas penser un instant de ce coté là. Merci bien.