Discussion :

[James64]

Bonjour,

J'aimerai trier une table paradox. Je vous expose mon problème.
G une table avec plusieurs enregistrements. Parmis ces enregistrements, plusieurs d'entre eux se répètent (lignes identiques) dus à une erreur. Je voudrait effacer ceux qui se sont répétés de manière anormale et garder le bon initiale.

Ex :

pierre | 20 ans | rouge
nicolas| 22 ans | bleu
anne | 19 ans | jaune
anne | 19 ans | jaune
anne | 19 ans | jaune
anne | 19 ans | jaune
anne | 19 ans | jaune
Franck | 24 ans | noir
Sylvie |23 ans | rouge

J'ai dejà essayé en filtrant sur l'element répété puis en utilisant Table1.delete mais c trop lent....

Si vous avez des solutions rapides..

Merci

[Rayek]

Regarde ceci ca te donnera une piste de comment faire

[James64]

Je fais ca

Code :

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

1
2
3
4
Table1.TableName:=StatusBar1.Panels[0].Text+'\'+Label1.Caption+'\'+'sortick.db';
    Table1.Open;
    Table1.Edit;
    Query1.ExecSQL;

La table1 est liée au datasource du Query1.
Je ne sais pas si je dois ouvrir la table1 avant (table à traiter et appelée dans SQL). Ou encore mettre edit pour permettre la modification de celle ci.

[James64]

A l'execution une erreur me dit que les données sont en lecture seule ?????????????

[James64]

SELECT DISTINCT * FROM TABLE1 T1
G enlevé le Table1.edit et G une autre erreur :

WHERE EXISTS (SELECT *
FROM TABLE1 T2
WHERE T1.Ninc <> T2.Ninc
AND T1.NoTicket = T2.NoTicket
AND T1.DatPai = T2.DatPai)

DELETE
FROM TABLE1 T
WHERE T.Ninc < ANY (SELECT Ninc
FROM TABLE1 T2
WHERE T.Ninc <> T2.Ninc
AND T.NoTicket = T2.NoTicket
AND T.DatPai = T2.DatPai)

Erreur "utilisation incorrecte du mot clé DELETE" ???

Pouvez vous m'aider ?

[e-ric]

A l'execution une erreur me dit que les données sont en lecture seule ?????????????

Sauf sous une certaine condition, le résultat d'une requête n'est pas modifiable.

En outre l'utilisation de ExecSQL dans ton code me paraît bizarre. Cette méthode ne permet pas d'obtenir un résultat (il faut utiliser Open avec une requête SELECT) et donc la liaison de la requête avec un TTable n'a pas de sens.

cdlt

e-ric

[touhami]

Bonjour,
tu peut essayer ce qui suit
1- creer une autre Table avec les meme champs de ta table source
seulement il faut indexer ta nouvelle table sur les champs que tu ne veux pas avoir des double.
2- faire un programme qui copie les données de la table ancienne vers la nouvelle table avec verification des données :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
    AncienneTable.close;
    AncienneTable.Open;
    While Not AncienneTable.EOF do
    begin
 
        1-   Fait une requette sql qui verifie que les données n'existe pas
        2-   Si les donnée n'existe pas alors
              MaNouvelleTable.Insert;
              Inserer les données;
              MaNouvelleTable.Post;       
        AncienneTable.Next;
    end;

Et comme ca tu as une table qui te convient.
Bon developpement

[James64]

aller voir sur le forum langage SQL
Merci