Voilà je n'arrive pas à faire marcher mon Delete pour ma requête comment faire? voila ma requête :
il me fait une erreur au JOIN
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28 begin if (combobox2.Text='Sélectionnez') then showmessage('Veuillez choisir une campagne!') else begin Query18.close; Query18.SQL.Clear; Query18.SQL.Add('Select CCode,Titre From Campagne'); Query18.open; Query18.first; While Not Query18.Eof do begin if ComboBox2.text=Query18.Fields[1].AsString then begin Query19.close; Query19.SQL.Clear; Query19.SQL.Add('Delete From Campagne C'); Query19.SQL.Add('JOIN CampagneItems CI ON (C.CCode=CI.CCode)'); Query19.SQL.Add('WHERE C.CCode=:x'); Query19.Params[0].AsString:=Query18.Fields[0].AsString; Query19.ExecSQL; end; Query18.next; end; end;
Partager