Discussion :

[Dominique_78]

Bonjour à tous,

Je désire lancer et piloter un utilitaire qui se trouve dans mon arborescence en:
C:\Program files\Stofware\NoSpam\Nospam.exe.

voilà mon code qui ne fonctionne pas:

Code :

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

1
2
3
 
Set WshShell = WScript.CreateObject("WScript.Shell")
Return = WshShell.Run("C:\Program Files\StofWare\NoSpam\Nospam.exe " & WScript.ScriptFullName, 1, true)

Erreur:
Ligne 2
Caractère 1
Le fichier spécifié est introuvable
code 80070002

Normalement, il faudrait mettre dans le premier argument de RUN une commande acceptable par le Dos du genre :
>Nospam
mais il faudrait pour cela ajouter au PATH la ligne:
C:\Program files\Stofware\NoSpam\;

1 Y a-t-il une solution sans changer le PATH ?
2 Comment change-t-on le PATH dans Windows XP ?
Il est remis à sa valeur d'origine par l'invite de commande.
Il doit figurer dans un de nombreux fichiers bat, mais le quel ?

Merci d'avance pour votre aide

Dominique

[SfJ5Rpw8]

et avec des " supplémentaires :

Code :

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

Return = WshShell.Run("""C:\Program Files\StofWare\NoSpam\Nospam.exe " & WScript.ScriptFullName & """", 1, true)

[Dominique_78]

Bonjour bbil,

Avec les quotes, j'obtiens le même message d'erreur:

Ligne 2
Caractère 1
Le fichier spécifié est introuvable
code 80070002

J'ai essayé le code suivant:

Code :

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

1
2
3
4
 
Set WshShell = WScript.CreateObject("WScript.Shell")
chemin= "C:\Program Files\StofWare\NoSpam\"
Return = WshShell.Run(chemin & "Nospam.exe " & WScript.ScriptFullName, 1, true)

Même erreur

[omen999]

bonjour,
j'avoue ne pas très bien saisir l'intérêt de :

Code :

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

& WScript.ScriptFullName

cela signifie-t-il que nospam attend comme paramètre le propre script qui le lance ?
que donne:

Code :

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

msgbox chemin & "Nospam.exe " & WScript.ScriptFullName

[abertaud]

Je pense que cette ligne devrait fonctionner :

Code :

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

Return = WshShell.Run(Chr(34) & chemin & "Nospam.exe" & Chr(34), 1, true)

Chr(34) étant le caractère guillemet

Car le chemin que tu donnes contient "Program Files". Du coup, lorsque ta commande Run est interprétée, il considère que tu veux lancer "C:\Program" avec, en premier paramètre : "Files\StofWare\NoSpam\noSpam.exe".

[Dominique_78]

Merci Abertaud,

Ca fonctionne

Dominique