[VBS] copie de fichier sur un partage réseau

easydoor -  
 raymix -
Bonjour,

j'utilise souvent psexec pour lancer des executables sur des postes distants, j'ai fait un petit vbs pour ça.

mon problème c'est que pour copier certains fichiers sur les machines distantes j'utilise un batch, et en fait ça serait plus commode si tout était dans le VBS.

mon problème étant que je ne connais pas du tout le langage, la question est donc quel serait l'équivalant en vbs de :

For /F %%I in ('Type "./liste.txt"') do xcopy /E Folder\*.* \\%%I\c$\Folder\

liste.txt étant la liste des hostnames.

en utilisant objfso.COpyFile je n'arrive pas a écrire sur c$.

merci pour votre aide
Configuration: Windows XP Internet Explorer 6.0

2 réponses

  1. raymix
     
    Bonjour,

    L'équivalent vbs:

    Set fso = createobject("scripting.filesystemobject")
    liste = fso.OpenTextFile("liste.txt")
    Do Until liste.AtEndOfStream
    fso.CopyFile "Folder" & "*.*", "\\" & liste.ReadLine & "\C$\Folder", True
    Loop
    liste.Close
    Set fso = Nothing

    Cordialement
    1
  2. fiu
     
    Salut

    Personnellement, j'utilise CreateObject ("Shell.Application").Namespace("c:\dossier").Items pour énumérer les fichiers... mais j'ai jamais eu besoin de les copier (depuis le VBS)

    Mais peut-être te serait-il plus simple de déposer les fichiers nécessaires sur un dossier partagé visible de tout le monde et que tes pgm exécutés par les machines distantes utilisent ces fichiers dans le dossier partagé.
    0