Lancer un exe depuis VB6 ?

Bonjour,
j'ai un probléme pour lancer un exécutable à partir de VB à l'aide de la commande Shell. Je sais que le sujet a déjà été traité ( http://www.developpez.net/forums/m541229-12/ )
Dans mon cas, il n'y a pas d'erreurs mais il ne se passe rien !

Le but est de zipper des fichiers. J'utilise WinZip en command line (WZZIP.exe). Si j'exécute la ligne moi-même la commande dans une fenêtre de commande, cela fonctionne bien. Mais pas via le VB.

Mon code :

Code:

---

1 2 3 4

ChDrive ("D") ChDir ("D:\DirA") cmd = "cmd.exe ""C:\Program Files\WinZip\WZZIP.exe"" ""Mon Fichier.zip"" ""Nouveau Fichier1.xls"" ""Nouveau Fichier2.xls"" " Shell cmd,vbMinimizedFocus

---

Je me retrouve avec une fenêtre DOS , et je suis bien dans la directory D:\DirA . Mais aucune trace de zip. A priori WZZIP.EXE n s'est pas exécuté.

Ensuite, dans cette fenêtre je colle la ligne suivante et je l'exécute :

Code:

---

"C:\Program Files\WinZip\WZZIP.exe" "Mon Fichier.zip" "Nouveau Fichier1.xls" "Nouveau Fichier2.xls"

---

Et là mon ZIP est bien créé.

Si Quelqu'un a une idée sur le pb , merci.

Sergio.

Bonjour,

Et c'est quoi cmd.exe ?
Un exécutable qui provient d'où?

A+

je pense que ta ligne de commande est incorrecte
essaie :

Code:

---

cmd = "cmd.exe C:\Program Files\WinZip\WZZIP.exe " & Mon Fichier.zip & " " & Nouveau Fichier1.xls & " " & Nouveau Fichier2.xls

---

Si la chaine de commande inclut cmd.exe, une fenêtre dos apparaitra

Code:

---

cmd = "C:\Program Files\WinZip\WZZIP.exe " & Mon Fichier.zip & " " & Nouveau Fichier1.xls & " " & Nouveau Fichier2.xls

---

Après pas mal d'essais en tout genre j'ai enfin réussi à trouver la bonne syntaxe :
- pas de cmd.exe
- pas de double quotes pour le nom de l'exe
- des doubles quotes pour les noms de fichier

Code:

---

1 2 3 4

ChDrive ("D") ChDir ("D:\DirA") cmd = "C:\Program Files\WinZip\WZZIP.exe ""Mon Fichier.zip"" ""Nouveau Fichier1.xls"" ""Nouveau Fichier2.xls"" " Shell cmd,vbMinimizedFocus

---

Sergio