Discussion :

[wiski08000]

language delphi et sql 2000 server

bonjour a tous

j'ai une table "liste_a_controler" et je voudrai voir les personnes qu'ont le même nom et prénom et date naissance situant dans ma 2ème table "dem_liquid" et les transmettre a

ma 3ème table " benef_trouver"

jai pu mettre une requette sql qui est :

Code :

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

1
2
3
4
5
6
7
SELECT DISTINCT *
FROM         Liste_A_Controler
WHERE     EXISTS
                          (SELECT     *
                             FROM         dem_liquid
                             WHERE     liste_a_controler.nom = dem_liquid.nom AND liste_a_controler.prenom = dem_liquid.prenom AND 
                                                   liste_a_controler.date_naiss = dem_liquid.date_nais)

requette sans insertion a ma 3ème table qui est benef_trouver

et je cherche comment la traduire sous language delphi
j'espère que ma question est claire et merci d'avance pour vos propositions.

[Barbibulle]

La question n'est pas très clair, que voulez vous dire par transformer une requete SQL en langage Delphi ???

Il n'y a pas de transformation à effectuer, vous utilisez un query dans lequel vous mettez votre requete et vous ouvrez le query en question pour avoir le résultat...

Votre requete ne fait pas ce que vous décrivez, elle n'insère pas comme vous le dite dans la table benef_trouver le résultat.
Il faudrait quelque chose du genre :

Code :

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

1
2
3
4
5
6
7
8
Insert into benef_trouver (col1,col2,col3,...)
(SELECT DISTINCT Col1, col2, col3,...
FROM         Liste_A_Controler
WHERE     EXISTS
                          (SELECT     *
                             FROM         dem_liquid
                             WHERE     liste_a_controler.nom = dem_liquid.nom AND liste_a_controler.prenom = dem_liquid.prenom AND 
                                                   liste_a_controler.date_naiss = dem_liquid.date_nais))

Dans ce cas là votre query ne retourne pas de donnée, un simple execute suffit pour insérer le résultat de votre requete dans benef_trouver

[retwas]

Bonjour,

Effectivement c'est pas très clair, sinon pour executer la requete dans Delphi et récupérer les données ..

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
Qry.SQL.Clear;
Qry.SQL.Append('SELECT DISTINCT *');
Qry.SQL.Append('FROM Liste_A_Controler');
Qry.SQL.Append('WHERE EXISTS');
Qry.SQL.Append('	(SELECT *');
Qry.SQL.Append('	FROM dem_liquid');
Qry.SQL.Append('	WHERE liste_a_controler.nom        = dem_liquid.nom AND'); 
Qry.SQL.Append('		  liste_a_controler.prenom     = dem_liquid.prenom AND'); 
Qry.SQL.Append('		  liste_a_controler.date_naiss = dem_liquid.date_nais)');
 
Qry.Open;
Qry.First;
 
while not Qry.Eof do 
begin
	// ...
end;

[wiski08000]

Bonjour,

Effectivement c'est pas très clair, sinon pour executer la requete dans Delphi et récupérer les données ..

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
Qry.SQL.Clear;
Qry.SQL.Append('SELECT DISTINCT *');
Qry.SQL.Append('FROM Liste_A_Controler');
Qry.SQL.Append('WHERE EXISTS');
Qry.SQL.Append('	(SELECT *');
Qry.SQL.Append('	FROM dem_liquid');
Qry.SQL.Append('	WHERE liste_a_controler.nom        = dem_liquid.nom AND'); 
Qry.SQL.Append('		  liste_a_controler.prenom     = dem_liquid.prenom AND'); 
Qry.SQL.Append('		  liste_a_controler.date_naiss = dem_liquid.date_nais)');
 
Qry.Open;
Qry.First;
 
while not Qry.Eof do 
begin
	// ...
end;

effectivement ma requette ne comprend pas l'insertion dans la table benef_trouver et 'est ce que je cherche ma requette + insertion dans benef_trouver


merci pour votre réponse c gentil

[wiski08000]

jai pu inserer en sql avec cette requette qui est :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
 
INSERT INTO Benef_Trouver
                      (nom, Prenom, Date_naiss)
SELECT DISTINCT Nom, Prenom, Date_naiss
FROM         Liste_A_Controler
WHERE     EXISTS
                          (SELECT     *
                             FROM         dem_liquid
                             WHERE     liste_a_controler.nom = dem_liquid.nom AND liste_a_controler.prenom = dem_liquid.prenom AND 
                                                   liste_a_controler.date_naiss = dem_liquid.date_nais)

mais en language delphi j'ai pas pu

comment mettre en place cette requette en delphi c sa mon pb je ne sais pas par ou commencé . merci

[retwas]

je ne sais pas par ou commencé . merci

Par lire la FAQ ?

Si tu veux executer ta requete dans Delphi tu ajoutes ton SQL dans un Query et ExecSQL

[wiski08000]

Par lire la FAQ ?

Si tu veux executer ta requete dans Delphi tu ajoutes ton SQL dans un Query et ExecSQL

c tout simple, merci