[VBS] copie de fichier sur un partage réseau
easydoor
-
raymix -
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
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
A voir également:
- [VBS] copie de fichier sur un partage réseau
- Fichier bin - Guide
- Partage de photos - Guide
- Comment réduire la taille d'un fichier - Guide
- Comment ouvrir un fichier epub ? - Guide
- Partage reseau - Guide
2 réponses
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
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
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é.
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é.