Discussion :

[Marcant]

Bonjour à tous,

A votre avis, y a t'il moyen sous delphi, via un bouton, de demander a ce qu'access exporte une certaine table d'une Bdd pour aller l'importer dans une autre BDD ?

en gros, j'aimerais à la base, faire une mise-à-jour d'une table produit via plusieurs autres tables qui se trouvent dans une autre base de données.

Est-ce que c'est possible et si oui, comment ?


Je vous remercie d'avance.


Marcant.

[Rayek]

Si les données viennent d'une base de données Access/paradox alors jette un oeil à la requete de type :

Code :

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

1
2
 
select * into La_table in L_autre_table

Sinon tu peux le faire directement en delphi, en réalisant ta procédure de transfert des données.

[Marcant]

Salut,

Oui, mais le problème ici, c'est que les tables en question se trouve dans 2 bases de données bien distinct ! Donc, je ne pense pas qu'une simple requête SQL puisse me faire ca.

Voilà mon problème. Sinon, les 2 bases de données sont bien 2 bases access.


Marcant.

[Rayek]

Ce n'est pas un problème surtout si c'est deux bases de données Access et ca se regle avec une requete ^^

Si la Table n'existe pas

Code :

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

1
2
3
4
 
select *  into [TableDestination]  IN '[Chemin+NomdelaDBDestination]'
from TableSource
Where [critères]

Si la table Existe

Code :

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

1
2
3
4
 
Insert into [TableDestination] IN '[Chemin + NomDeLaDBDestination]'
Select * from TableSource
Where [Critères]

Attention au ' qui encadre le chemin+NomDeLaDBDestination, il faut les mettre

[Marcant]

Ha excellent ca !

Je ne pensais pas qu'une requete dans un bdd pouvait aller cibler une autre !
Ben je vais essayer tout de suite, et je te tiens au courant.

Un grand merci !!!

Marcant.

[Marcant]

Bon, j'ai testé une fois directement depuis une des bases de donnée, ca marche bien ! Par contre, j'ai du donné le chemin exacte de ma base de donnée, y aurait-il moyen de lui mettre un chemin relatif ?

Après j'ai testé dans un ADOQuery de Delphi mais là, j'ai une erreur comme quoi il ne trouve pas le mdb de source (qui apparement, serait plutot la table de destination, car quand il ne trouve pas cellui-ci, j'ai un message d'erreur nettement plus parlant style : "ne trouve pas ''data\tupperware.mdb'' ").

Pour avoir plus facile, voilà ma requete dans l'ADOQuery :

ADOQuery_Art.Close;
ADOQuery_Art.Connection:=ADOConnection_Tup;
ADOQuery_Art.SQL.Clear;
ADOQuery_Art.SQL.Add('SELECT Article.Articleld, Article.ArticleLibelleFR ');
ADOQuery_Art.SQL.ADD('INTO [Produitplus] IN ''Data\Tuppe.mdb'' ');
ADOQuery_Art.SQL.Add('FROM Data\tupperware.mdb ');
ADOQuery_Art.ExecSQL;
ADOQuery_Art.Close;


Marcant.

[Marcant]

Voilà, c'est pour prévenir qu'après une très très grosse heure de recherche j'ai enfin pu réussir à faire passer une table d'une base de données à une autre via un ADOQuery de delphi.

Histoire que ca puisse servir à quelqu'un plutard, voici le code :

begin

// Chemin de ma base de donnée de destination
Source:=extractfiledir(application.ExeName)+'\Data\Tuppe.mdb';

ADOQuery_Art.Close;
ADOQuery_Art.Connection:=ADOConnection_Tup;
ADOQuery_Art.SQL.Clear;
ADOQuery_Art.SQL.Add(' SELECT * INTO Produitplus ');
ADOQuery_Art.SQL.Add(' IN '+QuotedStr(source)+' ');
ADOQuery_Art.SQL.Add(' FROM Article ');
ADOQuery_Art.ExecSQL;
ADOQuery_Art.Close;

// Message de confirmation
showmessage('Table Produitplus ajoutée !');

end;

Un tout tout grand merci à Malatar qui m'a non seulement aidé mais appris à faire ca. Merci bien !


Marcant,
Qui avance.