Discussion :

[new_in_delphi]

Salut,

J'utilise Delphi 5
J'ai des composants Datasource, ADOTable, et ADOQuery sur ma fiche.

Je cherche a sauvegarder le resultat d'un ADOQuery1 soit sous forme d'une table (TableQuery1.mdb) pour que je puisse l'utiliser comme DataSource d'une nouvele requete
ADOQuery2.

Merci.

[Frank]

Et bien, tu peux faire une requête du type

Code :

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

INSERT INTO Table1....

ou

Code :

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

SELECT mes CHAMPS FROM TABLE2 INTO TABLE1....

[new_in_delphi]

mon probleme c qu'il faut d'abord que je puisse sauvegrader le Query1.
merci

[Giovanny Temgoua]

Je proposerai ceci (à tester évidemment)

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
 
(*au préalable tu fais un TonQuery.Open; ton query contiendra les résultat de la requête*)
try
 MaTable :=TTable.Create(Application);
 With MaTable do begin 
  DatabaseName :="le nom de la base"; 
  TableName :="le nom de la table"; 
 end; 
 Batch := TBatchMove.Create(Application); 
 With Batch do begin 
   Destination := MaTable; 
   Source := TonQuery; //Source est un descendant de BDEDataSet dont TQuery fait partie
   Mode := batCopy; //Copie le contenu de TonQuery dans la nouvelle table
   Execute; 
 end; 
finally 
   MaTable.Free; 
   Batch.Free; 
end;

Tu pourrais aussi itérer sur les champs du Query pour une insertion "manuelle"

[Edit]
Désolé, la soluce est valable pour les compos du BDE seulement J'ai louper un peu le mot ADO!
Sinon, pour créer des tablesdans une base Access, il te faudra utiliser ADOX. Il y'a un tutoriel qui peut t'explique comment faire ici