SQL en chaine au lieu e l'editeur de code sql

SQL en chaine au lieu e l'editeur de code sql - Programmation

Marsh Posté le 22-04-2002 à 15:44:30    

SQL en chaine ! le 21/04 à 15h06  
 
qlq peut m'aider a ecrire ce code sql dans l'editeur de code delphi !  
 
Select *  
From Kiosque, Fact, Numero  
Where (Ref=:mref)  
      and(kiosque.ref=fact.ref)  
      and(kiosque.ref=numero.ref)  
      and(BIM=:mbim)  
      and(VINGT=:mvingt)  
      and(NAPPEL LIKE :mpq)  
en commencant par :  
Query1.SQL.Clear; // bien sur !  
 
et en terminat par  
Query1.SQL.Close;
 
Merci pour votre aide !

Reply

Marsh Posté le 22-04-2002 à 15:44:30   

Reply

Marsh Posté le 22-04-2002 à 16:29:20    

Code :
  1. with Query1 do
  2. begin
  3.   Close;
  4.   with SQL do
  5.   begin
  6.     Clear;
  7.     Add('Select * From Kiosque, Fact, Numero ');
  8.     Add('Where (Ref=:mref) and (kiosque.ref=fact.ref) ');
  9.     Add('and(kiosque.ref=numero.ref) and (BIM=:mbim) ');
  10.     Add('and(VINGT=:mvingt) and(NAPPEL LIKE :mpq) ');
  11.   end;
  12.   Params[0].AsString := 'ref';
  13.   Params[1].AsString := 'bim';
  14.   Params[2].AsInteger := 20;
  15.   end;
  16. end;


 
etc...

 

[jfdsdjhfuetppo]--Message édité par antp le 22-04-2002 à 16:32:13--[/jfdsdjhfuetppo]


---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire
Reply

Marsh Posté le 22-04-2002 à 16:42:00    

Merci antp;

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed