Visual Basic 6 ( VB6 ) contient une classe nommée " FileSystemObject " qui récupère le nom d'un dossier et renvoie la taille du contenu du dossier à l'aide de la fonction " GetFolder.Size " . Le code vous permet d'automatiser la création de fichiers et de vérifier pour disque dur existant et de l'espace du dossier pour s'assurer que le programme ne plante pas . Instructions
1
Cliquez sur le bouton "Démarrer " et sélectionner " Tous les programmes ". Cliquez sur " Microsoft Visual Basic " dans les groupes de programmes , puis cliquez sur " Visual Basic " pour ouvrir le logiciel.
2
Cliquez sur le menu «Fichier» , puis cliquez sur «Ouvrir» pour ouvrir une la fenêtre de dialogue . Cliquez sur le nom de votre fichier de projet Visual Basic , puis cliquez sur "Ouvrir" pour charger le code.
3
Double- cliquez sur le formulaire VB6 pour le charger dans le concepteur. Cliquez-droit sur la forme ouverte et cliquez sur " Afficher le code " pour afficher le code du formulaire dans l'éditeur
4
Tapez le code suivant pour récupérer la taille d'un dossier : .
Dim Comme système de fichiers FileSystemObject
Set système de fichiers = New FileSystemObject
GetFolderSize = filesystem.GetFolder . ("c: \\ windows ") Taille
Remplacer " C : \\ Windows " avec l' répertoire que vous souhaitez afficher. La variable " GetFolderSize » contient la taille du dossier.
5
cliquez sur "Enregistrer " dans la barre d'outils principale VB6 . Cliquez sur "Exécuter " pour exécuter le code dans le débogueur VB6 .