Discussion :

[Mael_Jr]

Bonjour à tous,

J'exécute un script .vbs avec le planificateur de tâches Windows.

Le code s'exécute mais la tâche reste "en cours" (comme si le script était infini).

Comment puis-je résoudre ce problème ?

Merci pour votre aide.

Voici le script exécuté :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
set objExcel = CreateObject("Excel.Application")
objExcel.DisplayAlerts=FALSE
set objWorkbook = objExcel.Workbooks.open("\\PARDMP23HD\c17661$\workarea\M\test.xlsm",,0)
objExcel.visible = False
objExcel.Run "je_teste"
objWorkbook.Save
objWorkbook.Close False
objExcel.DisplayAlerts = TRUE
set objWorkbook = nothing
objExcel.Quit
Wscript.Quit
set objExcel = nothing
Return 0

[ProgElecT]

Salut Mael_Jr, bienvenue sur DVP

Tu places

Code :

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

1
2
set objExcel = nothing
Return 0

après Wscript.Quit tes 2 dernière lignes ne sont pas exécutées, d’ailleurs tu devrais retrouver l'objExcel de le Gestionnaire de tâche colonne Applications ou/et Processus en cours.

Code :

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

1
2
3
msgbox "A que coucou, .... 1 fois"
WScript.Quit
msgbox "A que coucou, ..... 2ém fois"

A que coucou, ..... 2ém fois, ne sera jamais vue

[Mael_Jr]

Bonjour ProgElecT,

Lorsque j'exécute le script suivant, la ligne return 0 renvoie une erreur :

merci pour ton aide

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
set objExcel = CreateObject("Excel.Application")
objExcel.DisplayAlerts=FALSE
set objWorkbook = objExcel.Workbooks.open("\\PARDMP23HD\c17661$\workarea\M\test.xlsm",,0)
objExcel.visible = False
objExcel.Run "je_teste"
objWorkbook.Save
objWorkbook.Close False
objExcel.DisplayAlerts = TRUE
set objWorkbook = nothing
objExcel.Quit
set objExcel = nothing
Return 0
Wscript.Quit

[ProgElecT]

Re

A quoi te sert ce Return 0? puisque tu quittes le VBscript.

[Mael_Jr]

En fait, return 0 ne sert à rien (ça ne fonctionne pas). Mais le planificateur de tâches garde toujours le statut "en cours" (sans cette ligne).

[ProgElecT]

Tu dois avoir un bug dans l'application Excel.

Dans un premier temps, pour voire se qui se passe, rend visible l'application

Code :

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

1
2
3
4
set objExcel = CreateObject("Excel.Application")
objExcel.visible = True
objExcel.DisplayAlerts=FALSE
' ...... la suite du code

[Mael_Jr]

J'ai exécuté le script en rendant l'application et les alertes visibles. Le script s'exécute, dans la liste des processus, je vois Excel ouvrir puis se refermer. Cependant le statut du planificateur reste "en cours".

[ProgElecT]

Cependant le statut du planificateur reste "en cours".

et dans le Gestionnaire des tâches, tu y retrouves le nom de ton programme VBScript?

[Mael_Jr]

Pareil que pour le processus, dans le gestionnaire de tache je vois l'ouverture et la fermeture du fichier Excel.

[ProgElecT]

......, dans le gestionnaire de tache je vois l'ouverture et la fermeture du fichier Excel.

Dans le Gestionnaire des tâches, voix tu le nom du programme VBscript s'ouvrir, puis disparaitre comme Excel?
Si oui, s'est le paramétrage du lancement/exécution/fin dans le planificateur de tâches qui n'est pas correctement fait.
Si c'est le cas, posez la question dans le sous forum Index du forum Systèmes Windows de ton OS (windows 10, 8, 7 XP .....)

[Mael_Jr]

Je ne vois pas le programme VBS dans le gestionnaire de tâches s'ouvrir puis disparaitre. Je vais demander dans forum Index du forum Systèmes Windows. Merci pour ton aide .