Discussion :

[Hurin]

Bonjour,
Je sais maintenant que ce n'est pas un truc à faire, mais je voudrais seulement savoir quel est l'effet de ce code, à part générer l'erreur:

erreur de creation du handle de curseur

Voici mon code:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 
 with DataS.Query3 do
      begin
        Close;
        SQL.Clear;
        texte := 'update arret set DateModification =:SaisieModification where Id_Arret =:SaisieArret';
        SQL.Text := texte;
        ParamByName('SaisieArret').asInteger := TempArret;
        ParamByName('SaisieModification').AsDate:=Date;
        Prepare;
        //ExecSQL; 
        Active:=True;
      end;

Je pose cette question, parce que maintenant que j'ai compris mon erreur, je ne réussis pas à retrouver mes jolies bases d'avant,
Or, je n'ai pas fait de save depuis les modifs, ça m'embête un peu,...

Merci de répondre

[Cl@udius]

Salut

Puisque tu as une requête de mise à jour (Update) il faut utiliser ExecSQL et non pas Active := True (ou Open) qui lui est réservé au requête de type Select.

@+ Claudius

[SergioMaster]

Shematiquement
UPDATE est un SQL ne renvoyant pas de données donc pour exécuter la query il faut un ExecSQL
contrairement à un SELECT qui lui renvoi un ensemble de données donc active:=true ou Open

[Hurin]

Oui, c'est ce que j'ai compris après, mais j'avais déja éxécuté le programme une ou 2 fois (et donc levé 1 ou 2 fois l'exception ) et, depuis, même en remettant les choses dans l'ordre, j'obtiens des choses bizarres (relation avec les bases de données chaotiques, ce qui n'apparaissait pas avant,...)
Mais, je me rends compte que je vais être obligé de reprendre mes modifs de 0, à partir de la dernière version,...

Désolé de vous avoir dérangé et merci d'avoir répondu