copie de fichier avec profil itinéran

copie de fichier avec profil itinéran - VB/VBA/VBS - Programmation

Marsh Posté le 05-05-2009 à 17:47:13    

Hello,
HELP!!!
 
Je suis administrateur système de 130 pc et pas très bon en scripte!!brefff..
 
Je dois mettre un scripte en ouverture de session pour copié le normal.dot chez tous les users!!!
Je bosse dans une clinique et y a pas mal de boulet dont moi!!
 
Le truc c'est que j'ai des profile itinérant!!
 
le code que j'ai mis copie et colle sans problème!
le soucis c'est quand je mets comme adresse de destination genre %userprofile%appllication data\etc.........
sa me mets une erreur
 
le seul moyen quand le script passe c'est quand je mets la commande  c:\documents and settings\.....\application data\microsoft\modèles\normal.dot
 
 
Voilà le script
 
Dim FSO
Set FSO = CreateObject("Scripting.FileSystemObject" )
FSO.CopyFile "\\srv\deploy\normal.dot", "c:\ocuments and settings\...\application data\microsoft\modèles\normal.dot"
 
 
donc si je fais genre  
 
 
Dim FSO
Set FSO = CreateObject("Scripting.FileSystemObject" )
FSO.CopyFile "\\srv\deploy\normal.dot", "%userprofile%\application data\microsoft\modèles\normal.dot"
 
 
 
je stipule qu'il a une redirection des dossier!!! donc sur une session user dans executé si je tape %userprofile%\application data\microsoft\modèles\normal.dot  SA MARCHE SA OUVRE LE FICHIER
et evidement l'adresse du fichier se transforme en  c:\ocuments and settings\...\application data\microsoft\modèles\normal.dot
 
enfin ma syntax est fausse mais je sais pas ou vu que sur la session sa marche avec le nom du user exacte
 
par contre avec le code pas!!! sa me mets erreur ligne 3!
 
Le seul moyen c'est quand je mets  
Dim FSO
Set FSO = CreateObject("Scripting.FileSystemObject" )
FSO.CopyFile "\\srv\deploy\normal.dot", "c:\ocuments and settings\...\application data\microsoft\modèles\normal.dot"
 
 
sa sert à rien je veux pas me taper 100 scriptes!!!!
 
Svp ou est l'erreur!!!

Reply

Marsh Posté le 05-05-2009 à 17:47:13   

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed