User = Environ$("UserName")

user = Environ$("UserName")

MsgBox user

on reçoit le message "toto" test OK
xxxxxxxxxxxxxxxxxxxxxxxxxxxx

mais pour copier un dossier a un autre dossier ça fonctionne pas c:/users/user ==>"user=toto"

Dim objFSO As Object
Set objFSO = CreateObject("Scripting.FileSystemObject")
objFSO.copyFolder "C:\Users\User \Desktop\rrrr", "C:\users\user\Desktop\Nouveau dossier"

Merci de voir ce probleme

2 réponses

  • Votes
  • Date
  • Date décroissante
  1. Modérateur
    Bonjour,

    Il faut concaténer le chemin avec la variable
    https://www.tutorialspoint.com/vbscript/vbscript_concatenation_operators.htm

    NB: A l'avenir, merci de poster ton code correctement sur le forum en utilisant les BALISES DE CODE.
    Explications disponibles ici : https://codes-sources.commentcamarche.net/faq/11288-les-balises-de-code

    1. bonjour,

      je n'ai pas compris votre réponse
    2. Modérateur
      @windows94Qu'est-ce que tu ne comprends pas ?
      Le fait que tu ais déjà eu une réponse à une queston équivalente en octobre 2017 .... ou le fait qu'il faille concaténer ta variable avec le chemin ?
      Sachant que si tu prends la peine d'aller voir le lien de ton ancienne question... tu trouveras la réponse à cette "nouvelle" question.
  2. Bonjour
    Merci d etre plus claie dans vos reponses
    Je pense vous etes trompe de question
    1. Modérateur
      Personnellement je suis tout à fait clair dans mes propos.
      Par contre... j'ai l'impression que tu viens juste troller...
      Le fait d'utiliser le pseudo Windows94 sans t'être authentifié est des plus étrange... Merci de ne pas polluer inutilement les discussions des grandes personnes....

      Et si, par le plus grand des hasards, tu es bien LE windows94 .... et bien... apprend à lire les réponses qui te sont données...