Re: [réglé]Création d'un .bat pour sauvegarde de profil fire
Posté : lun. 16 mars 2015 08:24
Bonjour,
Et un script en Vb script ?

Et un script en Vb script ?

Forum de Partage & d'Entraide Informatique
https://www.team-aaz.com/forum/
vbs mon 2ème langage :palerider a écrit :Bonjour,
Et un script en Vb script ?
Code : Tout sélectionner
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objShell = CreateObject("wscript.shell")
completed = True
appData = objShell.ExpandenvironmentStrings("%APPDATA%")
SourceDir = appData & "\Mozilla"
DestDir = "D:\Sauvegardes"
If objFSO.FolderExists(SourceDir) Then
If objFSO.FolderExists(DestDir) Then
objFSO.CopyFolder SourceDir , DestDir , True
Else
WScript.Echo "Le répertoire " & DestDir & " n'existe pas !"
completed = False
End If
Else
WScript.Echo "Le répertoire " & SourceDir & " n'existe pas !"
completed = False
End If
If completed = False Then
WScript.Echo "Copie en erreur !"
Else
WScript.Echo "Copie achevée !"
End If
Comme évoqué par PaleRider et Soulfate ça écrase le contenu .... après je n'ai pas testé ça fait longtemps que je ne code plus en vbs.... mais d'après le vieil adage : c'est comme la bicycletteegval a écrit :je suis content d'avoir lancé un sujet qui amène des réflexions.
Que fait le programme s'il trouve déjà un dossier du même nom dans le répertoire? il l'écrase?