Discussion :

[zemeilleurofgreg]

Bonjour,

j'ai un petit problème avec ce code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
try
      adost2.Close;
      adost2.ProcedureName:=adost.ProcedureName;
      showmessage('try'+adost2.ProcedureName);
      adost2.Open;
    except
      on E:Exception do
      begin
         showmessage('except'+adost.ProcedureName);
        adost.ExecProc;
      end;
    end;

en fait il s'agit de composants TADOStoredProc (adost et adost2) qui exécute dans une boucle des requêtes existantes dans une base Access.

Certaines requêtes retourne un résultat et d'autre pas : ceci pour expliquer le adost2.open dans le try et le adost.execproc dans le except !!

je veux biensur que les requêtes ne soient exécutées qu'une seule fois mais il passe aussi bien dans le try que dans le except donc lorsque j'arrive sur une requête d'ajout dans une table qui a déja été exécutée dans le adost2.open, il râle avec adost.execproc qui essaie d'exécuter la même requête d'ajout. donc problème de doublons dans la table !!

quelqu'un aurait-il une solution à ce problème ?
Merci d'avance

[Paul TOTH]

l'except ne s'execute qu'en cas d'exception dans le try/except...ton open génère-t-il une exception ?

[zemeilleurofgreg]

en fait, je pensais qu'il en générait une mais l'exception que j'avais était due au fait qu'il passe dans le try mais aussi dans le except donc doublons !

le problème est que je ne sais pas dire à l'avance si je dois utiliser un "open" ou un "execproc" !!

[popo]

Ne serait-il pas possible (au lieu de tenter un Open et de faire un Exec si cela ne marche pas) d'extraire le texte de la requete et de tester s'il commence par "Select" pour ensuite faire un Open ou un Exec dans une simple structure conditionnelle ?

[zemeilleurofgreg]

l'idée est intéressante mais il y un ou plusieurs "select" dans toutes les requêtes

[Rayek]

l'idée est intéressante mais il y un ou plusieurs "select" dans toutes les requêtes

Si la requête possède dans son texte Insert,Update ou delete alors tu fais un ExecSQL sinon tu fais un open

Mais bon, avec les procédures stockées, c'est plus difficile.
Il faudrait peut être que tu renommes tes procédures stockées afin de savoir si c'est une requête avec resultat ou non.

Genre :
insert_Nom_de_la_procedure_stockée
delete_Nom_de_la_procedure_stockée
select_Nom_de_la_procedure_stockée
etc...