Discussion :

[jackvpt]

Bonsoir à toutes et à tous,

Encore un souci avec ma base de données...

Lorsque je veux supprimer dynamiquement un champ d'une table, j'utilise le code SQL

Code :

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

1
2
3
Query.close;
Query.SQL.text:='ALTER TABLE XXX DROP YYY';
Query.ExecSQL;

Ça fonctionne sauf que juste après l'exécution s'interrompt avec l'erreur:

unsuccesfull metadata update column YYY does not exist in Table/View XXX

D'où ça peut venir ?

J'utilise aussi un DataSetProvider, un ClientDataSet et un DataSource relié à un DBGrid.

Merci de votre aide.

[abdelghani_k]

Je crois que tu utlises des champs persistants (YYY est un champ persistant dans la table XXX). Un champ persistant est un champ ajouté dans l'éditeur de champ de la table (double clic sur la table).

[jackvpt]

Merci pour ta réponse abdelghani_k.

J'ai bien vérifié et l'éditeur de champ de la table est vide (le Query, le ClientDataSet et le DBGrid) .

Une autre idée ?

[redoran]

Slt;

unsuccesfull metadata update column YYY does not exist in Table/View XXX

c'est le champ qui n'existe pas dans ta table , vérifiée l'orthographe !!!! ou peut étre le champ réellement n'existe pas !!!!
donne plus de détails sur ta table

[jackvpt]

Bonjour,

Il n'existe plus parce que je l'ai volontairement supprimé dynamiquement...

Pour être plus précis j'ai une table avec 2 champs fixes que je dois garder ('NMR' et 'NOM') et d'autres champs qui varient en fonctions des besoins ('CHAMP1', 'CHAMP2', 'CHAMP3', ..., 'CHAMPn'). Je souhaite donc effacer les champs intitulés 'CHAMPx' et ensuite les recréer en fonction de mon nouveau n, qui peut varier à chaque utilisation (j'espère être assez clair ).

Voici le code:

Code :

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

1
2
3
4
5
6
7
8
9
10
j:=Query.FieldCount;
for i := 0 to j - 1 do begin
  nom:=Query.Fields[i].FullName;
  if leftstr(nom,5)='CHAMP' then begin
    Query.Close;
    Query.SQL.Text:='ALTER TABLE XXX DROP '+ nom;
    Query.ExecSQL;
    j:=j-1;
  end;
end;

[redoran]

Re , excuse je veut pas m'ingérai mais pourquoi enlevé un champ déjà ajouté , et si ce champ contiens des informations là vous aurai une perte d'information très importante....

[Cl@udius]

Salut

Si tu travailles vraiment avec le même Query (DML et DDL) cela ne marchera pas.

Code :

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

1
2
Query.SQL.Text:='ALTER TABLE XXX DROP '+ nom;
ExecSQL;

puis

Code :

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

nom:=Query.Fields[i].FullName;

A ce moment que contient Fields ? Pas sûr que ce soit encore les champs de la table.

Il n'y a pas d'autre solution que de manipuler dynamiquement cette table ?

@+ Claudius