Cómo obtener Folder Size en VB6

Visual Basic 6 ( VB6 ) contiene una clase llamada " FileSystemObject " que recupera el nombre de una carpeta y devuelve el tamaño de los contenidos de la carpeta con la función " GetFolder.Size " . El código le permite automatizar la creación de archivos y compruebe si hay unidad existente y el espacio carpeta para asegurarse de que el programa no se bloquee. Instrucciones
1

Haga clic en el Windows botón " Inicio" y seleccione " Todos los programas". Haga clic en " Microsoft Visual Basic " en los grupos del programa y , a continuación, haga clic en " Visual Basic " para abrir el software.

2 Haga clic en el menú " Archivo" y , a continuación, haga clic en "Abrir " para abrir una ventana de diálogo. Haga clic en el nombre de archivo de proyecto de Visual Basic y, a continuación, haga clic en " Abrir" para cargar el código.
3

Haga doble clic en el formulario VB6 para cargarlo en el diseñador. Haga clic en el formulario abierto y haga clic en "View Code " para ver el código del formulario en el editor
4

Escriba el siguiente código para recuperar el tamaño de una carpeta : .

Dim sistema de archivos como FileSystemObject

Set filesystem = New FileSystemObject

GetFolderSize = filesystem.GetFolder . ("c : \\ windows ") Tamaño

Sustituir " C: \\ Windows " con la directorio en el que desea ver. La variable " GetFolderSize " contiene el tamaño de la carpeta.
5

Haga clic en " Guardar" en la barra de herramientas Visual Basic 6 . Haga clic en " Ejecutar" para ejecutar el código en el depurador de Visual Basic 6 .