L'invite DOS et le batchfile, une merveille

Un petit programme capable de copier les données d'un compte utilisateur vers toute destination de votre choix. Ce qui est le rend pratique pour le backup des données utilisateurs. Il est aussi possible de le refaire à l'infini sans avoir à ré exécuter le code avec un compte admin. De plus, le code sera modifié ultérieurement pour lui permettre de prendre les informations dans un fichier texte puis de générer automatiquement les copies .....Bon à tester :)

*Attention, un contrôle est fait à l'entrée du compte ;)

:debut

@echo off

set /p machine=entrer le nom de la machine : 

set /p profile=entrer un profile : 

rem lister le contenu du répertoire Users dans un fichier texte (controle.txt)

dir /s \\%machine%\C$\Users\ > C:\Dossier_FAD\test\Dossier-prog\controle.txt

rem Boucler sur tous les mots présents dans le fichier jusqu'à l'obtention du profil souhaité

FOR /F "skip=5 tokens=3,4* delims= " %%a IN (C:\Dossier_FAD\test\Dossier-prog\controle.txt) do (

rem echo a=%%a  b=%%b  c=%%c  d=%%d

rem Sortir de la boucle dès l'obtention du profil souhaité

if %%b==%profile% goto debut1

)

echo -----------

echo le nom de la machine ou le profile est incorrecte

echo veuillez rentrer a nouveau les informations

echo -----------

goto debut

:debut1

echo La copie des données est en cours.....

xcopy /q \\win7-1\C$\Users\%profile%\Desktop E:\%profile%\Desktop /s/e/i/y

xcopy /q \\win7-1\C$\Users\%profile%\Favorites E:\%profile%\Favorites /s/e/i/y

xcopy /q \\win7-1\C$\Users\%profile%\Documents E:\%profile%\Documents /s/e/i/y

xcopy /q \\win7-1\C$\Users\%profile%\Pictures E:\%profile%\Pictures /s/e/i/y

xcopy /q "\\win7-1\C$\Program Files\Microsoft Office\Templates" E:\Templates /s/e/i/y

goto fin

:fin

echo La copie a ete faite avec succes

rem supprimer le fichier texte contenant les profils trouvés sur la machine

del /s C:\Dossier_FAD\test\Dossier-prog\controle.txt

Pause

Identifiez-vous pour afficher ou ajouter un commentaire

Autres pages consultées

Explorer les sujets