Bonjour,
 
Voila, je cherche a faire un script en vbs me permettant de copier des fichiers
d'un partage reseau ( \\nom_serveur\repertoire_partager) vers un emplacement lier a l'utilisateur connecter
( ex C:\Documents and Settings\utilisateur\Bureau\mes documents )
 
-just pour info, j'utilise ce script dans une GPO...
 
-message d'erreur a l'ouverture de session :
 
ligne:2
caract :1
le serveur distant n'existe pas ou n'est pas disponible : 'GetObject'
 
-le scripte :
 
 
strComputer = "RemoteComputer"
Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2" )  
Set colComputer = objWMIService.ExecQuery _
    ("Select * from Win32_ComputerSystem" )
 
For Each objComputer in colComputer
    Wscript.Echo objComputer.UserName
Next
 
 
dim strSourceFile,strTargetFile,file,collfiles,curfile,fs
strSourceFile="\\nom_serveur\repertoire_partager"
' Créer une instance du FSO
Set fso = CreateObject("Scripting.FileSystemObject" )
Set fs=fso.GetFolder(strSourceFile)
Set collfiles=fs.Files
' Exploration des fichiers du dossier
for each file in collfiles
   curfile= file.path
   strTargetFile="C:\Documents and Settings\%username%\Bureau\mes documents\" & file.name
' Création d'une copie du fichier
fso.CopyFile curfile, strTargetFile  
next
 
==-------
 
 
Please help..  

es tu sur de ton nom d'ordinateur ?

j'ai réussi a faire ma copi de fichier..
 
-donc je fait en sorte que quelque soit l'utilisateur connecter, la copie se fasse au bonne endroit.
 
-je cree ensuite un leceteur reseau qui pointe sur le repertoire du serveur ( v: )
 
-puis je copie les repertoires...
 
1 Dim FSO
2 Dim WshShell, UserName
3 set WshShell = WScript.CreateObject("WScript.Shell" )
4 UserName = WshShell.ExpandEnvironmentStrings("%Username%" )
5 Set objNetwork = CreateObject("WScript.Network" )
6 objNetwork.MapNetworkDrive "v:", "\\nom_du_serveur\repertoire"
7 Set FSO = CreateObject("Scripting.FileSystemObject" )
8 FSO.CopyFolder "v:\repertoire" , "C:\Documents and Settings\" & UserName & "\Application Data\Microsoft\"
 
 
-j'aimerais savoir comment je pourrais faire une verification du repertoire de destination de maniere a ne pas réécrire dessus et de deconnecter automatiquement le lecteur reseau...
 
une petite aide ? merci