script vbs ou en bat Fermé

Question

Bonjour,

j'ai un problème je voudrais créer un script qui me vérifie la présence d'un dossier sur mon reseau.

si le dossier toto_ancien qui se trouve dans C:\Program Files	ata\ existe alors ne rien faire et quitté.

si le dossier toto_ancien qui se trouve dans C:\Program Files	ata\ existe pas alor renommer le dossier toto qui se trouve dans C:\Program Files	ata\ en toto_ancien

ensuite copier le dossier toto qui se trouve dans \monreseaux\backup\dans C:\Program Files	ata\ 

j'ai commencé a faire sa mais sa coince un avis svp?



========================================================
Dim fso, fc, f

If ("C:\Program Files	ata	oto_ancien") =  "C:\Program Files	ata	oto_ancien"" then
	
	Wscript.quit 
	
	else if 


Set Fs=CreateObject("Scripting.FileSystemObject")
if not Fs.FolderExists("C:\Program Files	ata	oto_ancien") then

Set f = fso.GetFolder("C:\Program Files	ata	oto")
f.Name = "toto_ancien"

Set FSO = CreateObject("Scripting.FileSystemObject")
FSO.CopyFolder "\monreseaux\backup	oto, "C:\Program Files	ata\"

end if
WScript.Quit

bricomachin · Answer

voilà : 

@echo off 

rem Ceci est une ligne de commentaires qui n'a pas 
rem d'influence sur le script 
rem Le titre... 

title Création d'un dossier 

rem On se place dans le répertoire choisi: 

cd "C:\Program Files	ata\" 

rem si le dossier toto_ancien existe quitter 

if exist toto_ancien ( 

exit 

) else ( 

rem autrement 
rem on renomme le dossier 

rem /-y provoque la demande de confirmation 
rem de remplacement de dossier existant.(Par défaut) 
rem /y annule demande de confirmation de 
rem remplacement de dossier existant. 

move /y "C:\Program Files	ata	oto" toto_ancien 

rem on copie le dossier 

rem /e copie les répertoires et sous-répertoires, 
rem y compris les répertoires vides. 
rem /-y provoque la demande de confirmation 
rem de remplacement de dossier existant.(Par défaut) 
rem /y annule demande de confirmation de 
rem remplacement de dossier existant. 

xcopy /e /y "\monreseaux\backup	oto" "C:\Program Files	ata\" 

rem attendre que l'utilisateur appuie sur une touche 

pause 

rem tu peux remplacer pause par exit 
rem si tu veux quitter de suite 

)

Script vbs ou en bat

1 réponse

Discussions similaires