probleme de concatenation

Bonjour a tous,

J'ai actuellement un probleme de concaténation sous VBS pour lequel j'aimerais bien avoir une aide

En fait je copie des grapes PDF vers un repertoire ( dossier = "DOSSIER"? par exemple ) qui se doit d'etre variable et de nom ( nom_graph = "graphe.pdf" ) qui se doit aussi d'etre variable.

le code est comme ci dessous assez simple, et ces divers noms sont disposés dans la feuille excel "feuille"

le probléme est que pour le déplacement la conatenation qui definit le chemin de destination ne marche pas

oFl.Move "chemin_source","chemin\" & dossier & "\" & nom_graph

Que faut écrire ????

Mon code ci dessous

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18

nom_onglet = feuille.Range("B24").Value dossier = feuille.Range("D24").Value nom_graph = feuille.Range("C25").Value Doc.Sheets(nom_onglet).PrintOut Wscript.Sleep 10000 Dim oFS,oFl Set oFSO = CreateObject("Scripting.FileSystemObject") Set oFl = oFSO.GetFile("C:\Documents and Settings\stagiaire\Bureau\VBS\_impdf_.pdf") oFl.Move "C:\Documents and Settings\stagiaire\Bureau\VBS\_impdf_.pdf","C:\Documents and Settings\stagiaire\Bureau\New Control Panel\LIVRAISON ET SITE PRE_SYNCHROo\Comptes\" & dossier & "\" & nom_graph

---

il n'y aurai pas plutôt un probléme sur l'utilisation de la méthode move sur un objet file, celle-ci ne prenant en argument la destination seulement (pas la peine de répéter la source..)

;)

bbil à raison. Ton code devrait être tout simplement

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

nom_onglet = feuille.Range("B24").Value   dossier = feuille.Range("D24").Value   nom_graph = feuille.Range("C25").Value   Doc.Sheets(nom_onglet).PrintOut   Wscript.Sleep 10000   Dim oFSO,oFl Set oFSO = CreateObject("Scripting.FileSystemObject") Set oFl = oFSO.GetFile("C:\Documents and Settings\stagiaire\Bureau\VBS\_impdf_.pdf")     oFl.Move Chr(34) & "C:\Documents and Settings\stagiaire\Bureau\New Control Panel\LIVRAISON ET SITE PRE_SYNCHROo\Comptes\" & dossier & "\" & nom_graph & Chr(34)

---

En effet, en plus de l'utilisation erronée de la fonction Move, tu oublies un paramètre important :

Dans le nouveau chemin vers lequel tu veux déplacer ton fichier, il y a des espaces. Ce chemin n'est donc pas prix entièrement en compte, mais s'arrête à C:\Documents. Le reste étant considéré comme paramètres

Le caractère Chr(34) étant le guillemet, ton code devrait maintenant fonctionner