Lorsque Microsoft a lancé la génération actuelle de son Windows Script Host en 2002, il mis à la disposition des développeurs et administrateurs système un environnement de script puissant et flexible. Combiné avec un modèle accessible dans WSH objet qui permet aux programmeurs d`automatiser certaines des fonctionnalités intégrées du système d`exploitation Windows, VBScript, également connu sous le Visual Basic Scripting Edition, peuvent effectuer des tâches simples avec seulement quelques lignes de code. Parce que Windows depuis XP a inclus un support natif pour la compression et l`extraction de fichiers zip, un script VBScript court peut extraire le contenu d`un fichier zip dans un dossier.
Cliquez "Démarrer", "Tous les programmes", "Accessoires", "Bloc-notes" pour ouvrir le Bloc-notes de Windows.
Copiez et collez le code VBS suivant dans la fenêtre du Bloc-notes:
Fonction Décompressez (strFileName, strFolderName)
Dim objShell
Dim objFSO
`Créer Shell.Application afin que nous puissions utiliser la méthode CopyHere
Set objShell = CreateObject ("Shell.Application")
`Créer FileSystemObject afin que nous puissions utiliser FolderExists et CreateFolder si nécessaire
Set objFSO = CreateObject ("Scripting.FileSystemObject")
«Créer un dossier pour recevoir des fichiers si elle n `existe déjà
Si Non objfso.FolderExists (strFolderName) Puis objfso.CreateFolder strFolderName
`Utiliser CopyHere pour extraire les fichiers
objshell.NameSpace (strFolderName) .CopyHere objshell.NameSpace (strFileName) .Items
Réglez objFSO = Nothing
Réglez objShell = Nothing
End Function
Mettez votre propre nom de fichier zip et le nom du dossier dans les citations dans la ligne suivante
Décompressez "C: Test Test.zip","C: Test Test"
Modifier la dernière ligne de remplacer votre propre nom de fichier zip et le nom du dossier pour les exemples donnés à l`intérieur des guillemets. Vous pouvez spécifier un dossier existant ou non. Le script va créer le dossier si elle n`existe pas déjà.
Cliquez "Fichier", "Enregistrer sous" pour ouvrir la fenêtre de dialogue Enregistrer sous. Type "extractzip.vbs" (Sans les guillemets) dans la "Nom de fichier" boîte. Sélectionner "Tous les fichiers (.)" du "Sauvegarder comme type" menu déroulant. Clique le "sauvegarder" bouton pour enregistrer le nouveau fichier VBS.
Cliquez "Démarrer", "Documents" pour ouvrir une fenêtre de l`Explorateur Windows. Accédez au dossier où vous avez enregistré le fichier VBS à l`étape 4. Double-cliquez sur extractzip.vbs pour exécuter le script et extraire le fichier zip dans le dossier spécifié.
