Probleme avec path

Bonjour a tous,
j'ai des soucis avec une appli qui entre autre, charge une bitmap
au démarrage dans une PictureBox. Pour tenter d'isoler le probleme,
g fait un .Exe simple.
Comme dans l'original, je démarre sur une fonction "Main". Et la, dés
qu'il s'agit d'utiliser un chemin c'est la "cata" !.
J'ai mis l'exe dans "C:\" ,
j'ai fait un raccourci dans "SendTo", pour pouvoir charger le fichier a
traiter avec un click droit ("envoyer vers") ,

Le test se resume a placer un fichier "texture.bmp" n'importe ou, et de
l'envoyer dans l'exe (avec "SendTo").

Code:

---

1 2 3 4 5 6 7

Dim PathBitmap$ Dim test   PathBitmap$ = Left(Command$, Len(Command$) - 12)   test = Dir(PathBitmap$ & "texture.bmp")

---

La seul chose que j'ai pu constater pour l'instant, c'est que ça fontionne
si le nom du repertoire ne contient pas d'espaces !
Avec un nom de repertoire comme "a", ça marche, mais "a a" ne fonctionne
plus !
Si qq'un a une idée...

l'erreur c'est :
Error 52, "bad file name or number"
mais g une autre erreur quand il s'agit de changer une bitmap dans une PictureBox.

Pourquoi ne pas parler directement de l'erreur qui te préocupe plutot que de faire ce test ?
Je comprends pas trop le "-12" dans ton code, ca correspond à quoi ?
Pour savoir ce que valent les variables, tu peux faire un MsgBox mais à mon avis PathBitmap$ doit avoir une drole de valeur.

J'ai fait plus simple, avec une MsgBox avant pour etre sur qu'il n'y a pas de
probleme dans le chemin.

Code:

---

1 2 3 4 5 6

Dim test   MsgBox Command$   test = Dir(Command$)

---

C'est pareil !
trop fort :D
Dites moi qu'je suis nul :?

Que t'affiche MsgBox Command$ ?
Command$ est ce une variable d'environnement ? ou autre chose ?

Donne nous les valeurs de Command$ qui génèrent l'erreur stp.

Command$ renvoi ce qui est passé en ligne de commande quand on
appelle le programme. La, en l'occurence, il s'agit du chemin complet
du fichier. Par exemple "c:\test\texture.bmp"

J'ai du nouveau.
J'ai ajouté une PictureBox. Et a la place de l'ancien code, j'ai mis ça :

Code:

---

1 2 3 4 5 6 7

Dim test   MsgBox Command$ test = Command$   Form1.Picture1.Picture = LoadPicture(test)

---

Je rappelle que ceci est dans la fonction "Main" sur laquelle démarre le
programme.
Pour le test, j'ai donc crée un repertoire sur C: => "a a"
Au lancement, on a donc une MessageBox qui s'affiche avec :

"C:\a a\texture.bmp"

et ensuite : Error 75 "Path File Acces"

Si a la place de mettre :

Code:

---

1 2	test = Command$

---

je mets

Code:

---

1 2	test = "c:\a a\texture.bmp"

---

ça marche !!! 8O :D

Et si tu testes

Code:

---

debug.print Command$ = "c:\a a\texture.bmp"

---

Tu as True ou False ?

A essayer, MsgBox len(Command$), cela correspond vraiment a la longueur attendut?
Peut être qu'un caractére non imprimable/affichable est passé en même temps que le chemin.

je suis bien d'accord avec toi, c'est pour cette raison que j'aimerais connaitre le résultat du test d'égalité dont je parlais auparavant.

C'est ça ProgElecT :) , mais j'avais trouver avant de te lire.
Effectivement, "Command$" inclus des guillemets ! :? donc, 2 Chars
de plus...
J'utilise donc plus directement "Command$" , mais une variable intermediaire :

Code:

---

1 2 3 4

Dim Temp$   Temp$ = Mid$(Command$, 2, Len(Command$) - 2)

---

Forcement, ça marche beaucoup mieux :?
Faudra s'en souvenir...
Merci pour votre aide ;) :)

Citation:

---

Envoyé par OhMonBato

debug.print Command$ = "c:\a a\texture.bmp"

---

cela m'a fait penser que l'on pouvait continuer ton raisonnement en trouvant pourquoi la reponse serait False ;)
L'important est d'avoir resolut le probléme de bubu92
Salut à tous les deux.

Heu....ça s'complique...:?
Si le fichier a traiter se trouve dans un repertoire nommé "a a", y mets les
guillemets. Si le repertoire s'appelle "aa", y mets pas les guillemets !!
Bon bein, va falloir regarder si ya des guillemets a enlever au lieu de les
oter systematiquement. Un peu usant quand meme VB, hein :D

Je ne suis pas certain que ce soit VB qui ajoute des guillemets, c'est peut etre windows de façon a grouper l'ensemble du chemin pour qu'il ne soit pas traité comme plusieurs entités.

C'est fort possible parce que sans guillemet windows ne comprend pas les chemins de répertoire qui contienne un espace dans le nom. On observe souvent le problème avec "Program Files".

En fait je pense plutot que VB accepte plusieurs arguments dans la ligne
de commande. Et que ceux-ci doivent etre separés par des espaces.
Sauf si, dans le cas par exemple d'un chemin, on doit considerer toute
la chaine comme etant un seul argument. Dans ce cas, VB place des
guillemets pour indiquer que la chaine doit etre traiter comme un seul
argument.

bon pour te montrer, comme on te la dit plus haut, que c'est pas VB mais windows qui rajoute ces " ...

crée un fichier .bat ... :

Code:

---

1 2 3

@ECHO %1 pause

---

et déplace tes autres fichiers sur son icône.. ;)