Discussion :

[The Jos]

Bonjour à tous,

Voi j'ai un base access que j'attaque en delphi avec ODBC et les compo AccèsBD standard de delphi.

Je veux dans cette base supprimer certaines tables et les remplacer par des tables provenant d'une autre bases plus à jour. Comment puis faire pour automatiser cette procèdure avec delphi. En fait les utilisateurs de mon logiciel ont la même base que moi. Quand je mets à jours la mienne je voudrais répercuter cette miseà jour sur leur base en remplacant juste les tables que j'ai modifier par les miennes.

Auriez-vous une idée...

The Jos

[Just-Soft]

Salut;
je vais tenter d'y répondre même si j'ai pas bien compris. S'il s'agit de remplacer toute la table, simple suppression et copie suffisent . si tu dois mettre à jour la table, tu as la commande UPDATE du langage SQL très pratique.

[The Jos]

Bonsoir tout le monde,

Excusez moi pour le retard mais un autre projet est passé prioritaire. Je reprends donc mon post.

En fait voila j'ai développé un logiciel avec delphi et les compo AccèsBD standard.

Ce logiciel attaque une base mdb (access) contenant 4 tables (je rapelle qu'access encapsule toutes ces tables dans un seul fichier mdb).

Les tables 1 et 2 sont des tables que l'utilisateur renseigne (je n'y touche pas) les tables 3 et 4 sont des tables informatives (établissements scolaires).

Cest 2 dernieres tables, je dois les mettre à jour chaque année (nouveau responsable d'établissement, email d'établissement différent...). J'ai un double de la base de données chez moi. Je mets à jour les tables 3 et 4 (je change les données obsolètes à l'aide du logiciel access pour plus de facilité...)

Voila j'aimerai donc pour chaque utilisateur de mon logiciel ne remplacer que les tables 3 et 4 par celle de la base que j'ai mise a jour chez moi. Je ne peux pas écraser la base entière puisque les tables 1 et 2 sont personnelles et contiennent des données propres a chaque utilisateur.

Donc au final je veux integrer un menu ou un boutons "import" dans mon logiciel pour ne remplacer que les tables 3 et 4.

Voila si vous avez une piste je suis preneur.

[Just-Soft]

Salut;

Puisque chaque table a un nom un simple Update suffit. Car la commande SQL Update est censée manipuler des enregistrements d'une table donc les tables 1 et 2 ne seront pas touchées.
un tour dans les cours SQL te permettra de voir de quoi il s'agit.

[walid_kerkoub]

Il te faut une requête SQL qui supprime les anciennes données et puis insère les nouvelles :

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
procedure TForm_Main.Button1Click(Sender: TObject);
begin
With Query1 Do
   begin
      //Suppression des anciennes données
      SQL.Clear;
      SQL.Text:='DELETE Table3.* FROM Table3;';
      ExecSQL;
      //Insertion des nouvelles données
      SQL.Clear;    
      SQL.Text:='INSERT INTO Table3 ( Champ3_1, Champ3_2,Champ3_3)SELECT Table3_Ajour.Champ3_1, Table3_Ajour.Champ3_2, Table3_Ajour.Champ3_3 FROM Table3_Ajour;';
      ExecSQL;
   end;
//Réinitialiser la table après la mise à jour
Table3.Close;
Table3.Open;
end;