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....

[jackvpt]

Je dois modifier les champs de la table en fonction des besoins de l'utilisateur et mon idée est de relier la table modifiée à un DBGrid. Je pensais que c'était la façon la plus simple d'avoir un tableau dynamique mais apparemment non.

[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

[redoran]

Re ; là il suffit de créé un tableau dynamique sans passé par la création de table et des champs c'est un avis !!! vous pouvait faire simple fait un tour
http://delphipage.free.fr/tableaux.html

[jackvpt]

J'ai essayé autre chose: détruire la table avec un 'DROP TABLE XXX' et la recréer mais cette fois-ci j'obtiens le message d'erreur suivant:

unsuccesfull metadata update object XXX is in use

Ce qui revient à la même situation.

J'ai pourtant désactivé ou fermé les composants qui utilisent la table, rien n'y fait .

[abdelghani_k]

le message :

unsuccesfull metadata update object XXX is in use

indique que XXX est ouverte en cours d'utilisation.
tu fait

Code :

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

XXX.Close;

avant d'éxecuter la requete ALTER;

[jackvpt]

Ben pourtant tout est fermé, je n'arrive pas à trouver quel élément est relié à ma table .

Je vais laisser tomber la construction d'une table et je vais créer un tableau comme me le suggère redoran...