Discussion :

[olivier1209]

Bonjour,

J'essaye de lancer la commande suivante :

Code :

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

1
2
strCommand = """c:\Program Files\Test\launch.exe""" & " /config:C:\sample.xml"
intExit = objShell.run(strCommand,0,True)

ça me renvoie "specified file cannot be found". Donc soit j'ai un probleme avec l'espace entre "Program" et "Files" , soit c'est avec l'argument.
Je parviens à lancer la commande correctement (toute seule sans arguments). Mais si je veux en mettre un au bout ("/config:...") je m'embrouille avec les guillemets

Merci pour votre aide,
Olivier

[hackoofr]

Dans ce genre de situation essayez toujours d'ajouter au cours de vos tests des MsgBox pour "débugger" vos commandes et voir ce qu'il manque comme espace ou bien de guillemets etc....
Essayez ceci :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Option Explicit
Dim FileExe,Argum
FileExe = "%Programfiles%\Test\launch.exe"
Argum = "/config:C:\sample.xml"
 
RunMe FileExe,Argum
 
Function RunMe(FileExe,Argum)
    Dim Titre,ws,Command,Exec
    Titre = "Execution avec argument"
    Set ws = CreateObject("wscript.Shell")
    command = "cmd /c "& qq(FileExe) & " " & Argum &" "
    Msgbox command,64,Titre
    Exec = ws.run(command,0,True)
End Function
 
Function qq(str)
    qq = chr(34)& str &chr(34)
End Function

[olivier1209]

Merci pour ta réponse hackoofr
j'obtiens malheureusement toujours le même code 87 (cannot the file specified..)

[Cachlab]

Bonjour,

Heu question idiote, mais si tes arguments sont fixes, pourquoi les dissocier de la ligne de commande ?

Code :

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

intExit = objShell.run("c:\Program Files\Test\launch.exe /config:C:\sample.xml",0,True)