Cómo Obtener tamaño de la carpeta en VB6

Visual Basic 6 (VB6) contiene una clase denominada "FileSystemObject" que recupera el nombre de una carpeta y devuelve el tamaño de los contenidos de la carpeta utilizando la función "GetFolder.Size". El código le permite automatizar la creación del archivo y comprobar si hay unidad y el espacio carpeta existente para asegurar que el programa no se bloquea.

Instrucciones

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

2 Haga clic en la opción de menú "Archivo" y, a continuación, haga clic en "Abrir" para abrir una ventana de diálogo. Haga clic en su 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 de VB6 para cargarlo en el diseñador. Haga clic en la forma abierta y haga clic en "Ver código" para ver el código del formulario en el editor.

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

Como sistema de archivos Dim FileSystemObject

Establecer el sistema de archivos = Nueva FileSystemObject

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

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

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