Commande cmd qui ne fonctionne pasRésolu

Question

Bonjour,

je souhaite lancer un programme que j'ai codé en c# via un cmd.
La commande cmd est lancée via une macro vba. 

j'ai le problème suivant avec les lignes de code suivantes : 

Set wsh = VBA.CreateObject("WScript.Shell")

wsh.Run "C:\Windows\System32\cmd.exe /K C:\Users\Public\Documents\'Visual Studio 2010'\Projects\DrafterZMQBLOOM\DrafterZMQ\Drafter\bin\Debug\RTGenBloom.exe AUTOMATIC", 1, False

 
=> dans le cmd, il y a le message d'erreur suivant :

 
'C:\Users\Public\Documents\'Visual' is not recognised as an intern operable program or batch file

 
J'ai l'impression que le cmd n'aime pas les espaces.


Quelqu'un aurait il une solution svp ?
 

Cordialement.

jordane45 · Answer

Bonjour,

Commence par retirer les quotes que tu as mis autour de 'visual studio'

cs_Le Pivert · Answer

Bonjour,

j'ai été confronté a ce problème il y a quelque temps. Voici le lien pour y faire face:

http://www.office-loesung.de/ftopic619862_0_0_asc.php 

Option Explicit
'http://www.office-loesung.de/ftopic619862_0_0_asc.php
Private Declare Function Wow64DisableWow64FsRedirection Lib "kernel32.dll" ( _
    ByRef oldvalue As Long) As Boolean
Private Declare Function Wow64RevertWow64FsRedirection Lib "kernel32.dll" ( _
    ByVal oldvalue As Long) As Boolean
Public Sub prcStartMSConfig64()
 Const MS_CONFIG As String = "C:\Windows\system32\msconfig.exe"
 Const WND_SHOWNORMAL As Variant = 1
 Dim lngWow64RedirectReturn As Long
 Dim objShell As Object
  
 Set objShell = CreateObject("Shell.Application")
 lngWow64RedirectReturn = 0
 Wow64DisableWow64FsRedirection lngWow64RedirectReturn

objShell.ShellExecute MS_CONFIG, vbNullString, vbNullString, "open", WND_SHOWNORMAL
  
 Wow64RevertWow64FsRedirection lngWow64RedirectReturn
 Set objShell = Nothing
End Sub
'ouvre le programme de capture
Private Sub CommandButton1_Click()
 Shell "C:\Windows\SysNative\SnippingTool.exe", vbNormalFocus 'adapter le chemin de l'exe
End Sub