Étape 7: snapshot.vbs a expliqué
Dim FriendlyDateDim FriendlyTimeFriendlyDate = Replace(Date, "/", "-")FriendlyTime = Mid(Replace(Time, ":", "-"), 1, 5)
Cela crée deux variables, FriendlyDate et FriendlyTimeet leur affecte la date et l’heure. Les fonctions de remplacement sont là parce que la date en VBSCript est représentée sous la forme 28/11/2008, mais Windows n’aime pas les caractères de barre oblique dans un nom de fichier, donc ils sont remplacés par des tirets. La même chose est fait pour les : personnages dans le temps (12: 34:56). La commande Mid aussi se dénude les secondes depuis l’époque, donc "28/11/2008_12:34:56" devient "28-11-2008_12-34".
Dim WShellSet WShell = CreateObject("Wscript.Shell")
Cette partie est créer un objet shell, effectivement une invite de commandes pour VBScript, afin qu’il puisse utiliser des commandes de ligne de commande comme « bouger ».
WShell.Run ("cmd /c move " + Wscript.Arguments(0) + " .\Backups\" + FriendlyDate + "_" + FriendlyTime + "_" + Wscript.Arguments(0))
Cela indique VBScript pour émettre une commande move à son objet de ligne de commande. Pour briser cette ligne supplémentaire m’obligerait à entrer dans les détails de comment VBScript gère les chaînes donc je m’abstiendrai de le faire. Essentiellement, la WScript.Arguments(0) devient le nom du fichier que vous avez passé au script plus tôt (archive.zip) et FriendlyDate et FriendlyTime deviennent la valeur du texte même de la date et l’heure, par exemple "18/10/2008" et "14-30". Les caractères plus réunir différents bits en une seule longue chaîne.
La commande finale qui est passée à la ligne de commande ressemble à
déplacer.\Backups\18-10-2008_14-30_archive.zip archive.zip. Si vous souhaitez enregistrer vos sauvegardes dans un emplacement différent, alors vous pouvez modifier le nom du dossier « .\Backups\ » pour, par exemple, « E:\My_Lovely_Version_Control\ ». Si vous ne voulez pas les horodatages, vous pouvez supprimer le « + FriendlyTime » mais alors qu’une seule archive par jour peut être stockée (toutes les autres sauvegardes écrasera l’archive existante).