Script avec paramétrage

Bonjour
J'ai essayé de procéder comme indique dans la Faq, mais je n'y parvient pas.
voici mon code, sachant que l'argument ne passe pas .
l'appelant :

Code:

---

1 2 3

ph= "j'ai du bon tabac" Set WshShell = WScript.CreateObject("WScript.Shell") Retour = WshShell.Run("parlant.vbs " & chr(34) & ph & chr(34))

---

l'appelé :

Code:

---

1 2 3 4 5 6 7

Set Voix = CreateObject("SAPI.Spvoice") If wscript.Arguments.length >0 Then phrase= wscript.Arguments(0) else phrase= "aucun argument transmis" end if Voix.Speak phrase

---

:salut:
Il faut exécuter le script avec le moteur cscript.exe et non pas avec wscript.exe pour passer les arguments ;)

Code:

---

1 2 3 4

ph= "J'ai du bon tabac" Set WshShell = WScript.CreateObject("WScript.Shell") Retour = WshShell.Run("cscript parlant.vbs " & chr(34) & ph & chr(34),1,True) 'La valeur=1 Exécution avec affichage de la console Retour = WshShell.Run("cscript parlant.vbs " & chr(34) & ph & chr(34),0,True) 'La valeur=0 Exécution sans affichage de la console

---

Merci pour la solution; je n'y comprenais plus rien, d'autant plus que ça avait déjà fonctionné.:ccool: