Salut à tous!    
Donc voila, je dois rechercher sur le disque tous les fichiers de types doc et les copier sur un serveur distant.
Voici le code qui fonctionne :
 
msgbox "Recherche de documents Word"
strComputer = "."  
Set objFSO = CreateObject("Scripting.FileSystemObject" )
Set objWMIService = GetObject("winmgmts:" _  
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2" )  
Set colFiles = objWMIService.ExecQuery _
("SELECT * FROM CIM_DataFile WHERE Drive = 'C:' AND Extension = 'doc'" )
For Each objFile in colFiles  
'Wscript.Echo objFile.Name
 
Le probleme, c'est que maintenant, je souhaiterai copier les fichiers doc que la recherche a trouvé sur un serveur distant mais j'arrive pas à récuperer ces resultats.
On peut les mettre dans une variable mais ensuite, comment copier tout le contenu d'une variable?
Merci d' m'éclaircir car je bute sérieuseement.  

Normalement, il devrait être visibles grâce à

Bien sûr il faut enlever l'apostrophe du début de la ligne, car elle indique une ligne en commentaire, mais je suppose que vous savez déjà cela. Par ailleurs, j'ai quelques exemples avec des SELECT, mais c'est .DisplayName qui est utilisé au lieu de .Name, ce qui ne change peut-être pas grand chose.
 
Edit : Ensuite pour copier les fichiers on peut utiliser  

Merci olivthill!
Sa semble marché mais j'ai toujours le message : "Permission refusée" qui s'affiche. Pourtant, je copie des fichiers dont lesquels j'ai accès.