[commande DOS] Récupérer le code retour d'un programme

Bonjour,

je souhaiterai récupérer le code retour renvoyé par un application, en l'occurence SQLplus d'ORACLE.

mon batch nommé 'test.bat' se présente comme suit

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21

:begin echo off sqlplus -s user/pass@DB @test.sql if errorlevel 0 goto endlevel0 if errorlevel 1 goto endlevel1 if errorlevel 2 goto endlevel2 if errorlevel 3 goto endlevel3 :endlevel1 echo erreur level 1 goto :EOF :endlevel2 echo erreur level 2 goto :EOF :endlevel3 echo erreur level 3 goto :EOF :endlevel0 echo erreur level 0 goto :EOF

---

Mon fichier sql, lui est tout simple

Code:

---

1 2 3 4 5 6 7 8 9

WHENEVER SQLERROR EXIT SQL.SQLCODE; WHENEVER OSERROR EXIT; select * from toto where ncntnum = 'XX'; insert into toto(1,2); exit

---

Donc je génère une erreur car la table toto n'existe pas, donc je devrais avoir un code retour correspondant à l'erreur sql.

Quand j'exécute mon fichier bat, je me trouve toujours dans le bloc

Citation:

---

if errorlevel 0 goto endlevel0

---

Est-ce que j'utilise les bonnes commandes ?

Merci d'avance de votre aide

A prioris les commandes DOS semblent correct,mais ajoute ceci en début de script SQL :

Code:

---

1 2	whenever sqlerror exit failure

---

oui car la fin de ton script se termine par "exit" et non pas exit "code_erreur"
donc le exitfailure devrait faire l'affaire

Voici une solution :

Code:

---

1 2 3 4 5 6 7

Whenever sqlerror Exit Failure WHENEVER SQLERROR EXIT SQL.SQLCODE; Select * From toto Where ncntnum = 'XX'; Insert Into toto(1,2); Exit

---

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

Echo off sqlplus -s user/pass@DB @test.sql Goto Error%ErrorLevel% :Error0 echo pas d'erreur goto :EOF :Error1 echo erreur level 1 goto :EOF :Error942 Echo Erreur numero : %ErrorLevel% echo Erreur : Table ou vue inexistante goto :EOF

---

Super ça marche.

Pour aller plus loin j'ai encore 1 ptite question.
En fait je lance mon fichier test.bat à partir d'une macro VBA, à l'aide de la commande

Code:

---

var_Retour = Shell("chemin_du_fichier.bat",1)

---

En fait j'aimerai récupérer le code retour ErrorLevel. J'ai essayé par exemple de faire un

Code:

---

1 2 3 4 5 6 7 8 9 10

Echo off sqlplus -s user/pass@DB @test.sql if not ErrorLevel 0 goto :Erreur :Erreur echo Erreur numero %ErrorLevel% exit %ErrorLevel% goto :EOF

---

Mais je récupère toujours une valeur aléatoire pour ma variable var_Retour.

Y a-t-il un problème dans mon code?

Sous XP ( Exit /?)

Code:

---

1 2	Exit /B CodeSortie

---

Sous W2K si cette syntaxe n'existe pas je ne connais pas d'astuce pour le faire.

Pourquoi ne pas exécuter directement Sqlplus dans la ligne du shell et gérer l'erreur dans le VBA ?

J'ai essayé de lander la commande sqlplus directement dans le VBA, mais le code retour que je récupère est toujours aléatoire

Code:

---

var_Retour = Shell("sqlplus user/pass@base @monfichierSQL",1)

---

Avec l'exemple du fichier sql qui me génère une erreur 942 (table qui n'existe pas), mais variable var_Retour prend des valeurs différentes à chaque appel.

:(

Le comportement me semble 'normale'

Citation:

---

If the Shell function successfully executes the named file, it returns the task ID of the started program. The task ID is a unique number that identifies the running program. If the Shell function can't start the named program, an error occurs

Note By default, the Shell function runs other programs asynchronously. This means that a program started with Shell might not finish executing before the statements following the Shell function are executed.

---

Et avec l'API CreateProcess, tu as essayer ?

Bon j'ai trouvé une alternative :
dans mon fichier test.bat, je mets la commande

Code:

---

echo Erreur numero %ErrorLevel% > c:\erreur.txt

---

Après je traite ce fichier c:\erreur.txt en VBA et le tour est joué.

Voilà merci encore pour votre aide :D