Shell avec espaces et nom variable

Bonjour!

J'ai regardé si une discussion de ce type existait sur plusieurs forums, j'espère vraiment que ma demande n'est pas redondante...

Alors voici mon bout de code qui m'embête en ce moment:

Code:

---

lancement = Shell("""C:\Program Files\Dassault Systemes\B19\win_b64\code\bin\CATSTART.exe""" & NomFichier, 1)

---

J'ai lu les articles sur les guillemets à rajouter en cas d'espace dans le String, mais je n'ai pas trouvé de précisions par rapport à des espaces dans mon nom variable qu'est "NomFichier". J'ai essayé avec et sans le "&", avec plus ou moins de guillemets, avec vbGet, vbMethod (je ne crois pas avoir compris ce passage-là, d'ailleurs, si quelqu'un peut éclairer une pauvre noob), and frankly, I'm out of ideas :?

Si quelqu'un a une idée (ou une idée d'où je peux trouver une réponse), je suis toute ouïe! D'ailleurs, pour moi le problème réside dans les espaces, mais c'est peut-être autre chose!

Thanks anyhow!

(Note: j'ai commencé le VBA la semaine dernière :D, j'aime beaucoup ça, il me manque juste BEAUCOUP de pratique... et de jugeote)

Argh, je viens de trouver quelque chose:

Apparemment il faudrait faire quelque chose de cette forme:

Code:

---

1 2 3

Shell """C:\Program Files\Microsoft Office\Office\winword.exe"" _ """ & strFichier & """", _ vbNormalFocus

---

Mais mon programme ne lance toujours rien. Et ne me retourne pas d'erreur, c'est ça le plus frustrant.

Bonjour,

A minima, il manque un espace après le nom de l'exécutable :

Code:

---

lancement = Shell("""C:\Program Files\Dassault Systemes\B19\win_b64\code\bin\CATSTART.exe """ & NomFichier, 1)

---

N'ayant pas Catia, je ne peux malheureusement tester votre code.

La meilleure façon de procéder pour comprendre d'où vient l'erreur reste souvent de tester votre commande directement en interactif, dans l'application cmd.exe.

Cdt

Pour ouvrir un fichier avec Word, vous pouvez utiliser :

Code:

---

Shell """C:\Program Files\Microsoft Office\Office\winword.exe"" """ & strFichier & """", vbNormalFocus

---

Cette commande fonctionne même si strFichier contient des espaces.

Cdt

Hm...
J'ai essayé avec

Code:

---

lancement = Shell("""C:\Program Files\Microsoft Office\Office\winword.exe"" "" C:\Documents and Settings\mclozel\Desktop\unFichierWord """, 1)

---

et ça n'ouvre pas (j'ai essayé avec les extensions .doc et .docx)

(Mais je ne sais pas si le .exe de Word est vraiment là, c'est le PC de boulot, et le disque C est caché, bien que j'arrive à contourner ça en tapant l'adresse dans la barre. Donc il y a bien un dossier Office, et donc je suppose que c'est là, mais on ne sait jamais)

D'où peut venir le problème? :?

(Merci de la rapidité de réponse en tout cas!)


~ un peu plus tard ~
Je confirme, je ne trouve pas le .exe de Word avec l'invité de commande,
alors que celui de CATIA est bien là où je le cherche.

Le problème doit venir de plus haut dans mon programme. Merci quand même!

Back already!

J'ai arrangé mon programme, il ouvre mon logiciel, mais pas le fichier :(

salut,

le second paramètre de la fonction shell doit être le chemin du fichier, OUI, mais avec l'extension :aie:

bonjour,
les espaces sous dos, car shell exécute de commande dos, sépare les instruction:
nopad.exe monfichier.txt
nopad.exe monfichier.txt. c:\Mon répertoire\monfichier.txt
dos n'y comprends rien ces pour cette raison qu'il faut encadrer chaque expression.
le problème, encore un, c'est que l'on si embrouille avec les ", "", """"....
voilà comment je procède:

Code:

---

1 2 3

MaCommande="NotePad.exe" MonFichier="c:\Mon répertoire\monfichier.txt" Shell Chr(34) & MaCommande & Chr(34) & " " & Chr(34) & MonFichier & Chr(34)

---

Bonjour,

J'avais bien mis l'extension... mais pas le chemin entier :aie:
J'avais trouvé mon erreur mais j'espérais que quelqu'un m'explique les espaces :)
Maintenant que c'est fait, grand merci tout le monde!

C'est résolu! :ccool:

(après, Catia est très chiant(e), et j'arrive pas à ouvrir le fichier directement, alors qu'avec Pro-Engineer, pas de problème... Donc au moins c'est pas la faute à mon code! nah!)

A Bientôt pour de nouvelles aventures!

Never Give Up, Never Surrender!