Discussion :

[souminet]

Bonjour à tous,

Voilà, je travaille sur Delphi7, et quand j'esseye de mettre la propriété de mon query à true , le message d'erreur suivant s'affiche: Erreur à la création du handle de curseur

Code :

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

1
2
3
INSERT INTO "ArchAbs.DBF"  (NUM, MATRICULE,PUCE,NOM,PRENOM,FONCTION,DEPT, DATES )
SELECT NUM,  MATRICULE, PUCE, NOM, PRENOM, FONCTION, DEPT,  DATES 
FROM "TempAbs.DBF"

Mes table sont de type DBASE IV

Je n'ai pas compris le problème!!!???

Merci de m'aider!

[philnext]

Ben si on avait ton code Delphi ce serait plus simple à voir.
SI tu passe ta requète directement à ta base avec un autre outil ça donne quoi ?

[souminet]

Ben si on avait ton code Delphi ce serait plus simple à voir.
SI tu passe ta requète directement à ta base avec un autre outil ça donne quoi ?

Comment ça un autre outil, pardonnez mon ignorance!!!

Merci

[anapurna]

salut

ton code n'accede pas a tes tables dbf
il peut y avoir diverse raison a cela

tu y accede avec quelle composant ?
utilise tu un alias ?
les champs de ta table existe t'il tous ?
sont t'il correctement ortographié ?
...

pour l'outil il parlait par exemple du dbexporer

@+ Phil

[souminet]

en fait le code est le suivant:

Code :

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

1
2
3
4
5
6
7
8
procedure TFAbsence.abledesAbsents3Click(Sender: TObject);
begin
datamodule5.Qarchiv.SQL.Clear;
 
datamodule5.Qarchiv.SQL.ADD('INSERT INTO "ArchAbs.DBF"(NUM, MATRICULE,PUCE,NOM,PRENOM,FONCTION,DEPT,DATES)');
datamodule5.Qarchiv.SQL.ADD('SELECT NUM,MATRICULE,PUCE,NOM,PRENOM,FONCTION,DEPT,DATES FROM "TempAbs.DBF"');
datamodule5.Qarchiv.Active:=true;
end;

Merci de m'aider

[souminet]

J'utilise les composants Ttable et Tquery,

Les noms de champs sont correctement orthographiés, et les champs sont tous cités...!!!!

[souminet]

J'ai enfin trouvé, Le IK était à ce niveau:

Code :

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

1
2
3
4
5
6
7
procedure TFAbsence.abledesAbsents3Click(Sender: TObject);
begin
datamodule5.Qarchiv.SQL.Clear;
 datamodule5.Qarchiv.SQL.ADD('INSERT INTO "ArchAbs.DBF"(NUM, MATRICULE,PUCE,NOM,PRENOM,FONCTION,DEPT,DATES)');
datamodule5.Qarchiv.SQL.ADD('SELECT NUM,MATRICULE,PUCE,NOM,PRENOM,FONCTION,DEPT,DATES FROM "TempAbs.DBF"');
datamodule5.Qarchiv.Active:=true;
end;

En fait, il apparait que les requêtes du type insert,delete ou update s'exécute avec la méthode 'ExecSql'.

Donc il fallait tout simplement reprendre le code en insérant:

datamodule5.Qarchiv.ExecSql;

Voilà, j'ai voulu reprendre la solution du problème sur le forum pour l'interêt de tous..

Merci