Pause dans un vbs

Bonjour à tous

Je vous explique
Je créé un vbs qui effectue l'installation d'un msi en mode silencieux et derierre je teste lea présence du répertoire d'installation du msi et j'ai fait un
Wscript.sleep(40000) entre les deux
Je vous mon script dans un GPO machine et mon scriptsemble planter au niveau de mon pause c'est à dire mon sleep

En gros :

Code:

---

1 2 3 4 5 6 7 8

Shell=Createobject("Wscript.Shell) cmd= msiexec.exe /I "CheminmonMSI " /q Shell.run (cmd) Wscript.sleep(40000) soit pause de 40 secondes   IF Folderexist(REP )THEN Traitement END IF

---

Auriez vous trouvé une astuce pour effectuer un pause dans mon cas
attendre que le msi soit fini et ensuite tester la présence de mon répertoire

Merci d'avance pour votre aide

revoir les options de la commande run :

Comment exécuter un programme externe ?

Citation:

---

Envoyé par Scriptman

Bonjour à tous

Je vous explique
Je créé un vbs qui effectue l'installation d'un msi en mode silencieux et derierre je teste lea présence du répertoire d'installation du msi et j'ai fait un
Wscript.sleep(40000) entre les deux
Je vous mon script dans un GPO machine et mon scriptsemble planter au niveau de mon pause c'est à dire mon sleep

En gros :

Code:

---

1 2 3 4 5 6 7

Shell=Createobject("Wscript.Shell") cmd= msiexec.exe /I "CheminmonMSI " /q Shell.run (cmd) Wscript.sleep(40000) soit pause de 40 secondes IF Folderexist(REP )THEN Traitement END IF

---

Auriez vous trouvé une astuce pour effectuer un pause dans mon cas
attendre que le msi soit fini et ensuite tester la présence de mon répertoire
Merci d'avance pour votre aide

---

Salut ! Try this Code i hope that works for you :zoubi:

Code:

---

1 2 3 4 5 6 7 8 9 10

Dim com,Result Set ws=Createobject("Wscript.Shell") com= "cmd /c msiexec.exe /I CheminmonMSI /q" Result = ws.Run(com,0,True) Wscript.sleep 40000 'soit pause de 40 secondes   IF Folderexist(REP )THEN Traitement END IF

---