Tamaño de una carpeta

Bueno, ya lo tengo. Por si le interesa a a lguien, ahí va:

DIM ruta
DIM mi_dir
DIM Total

Set tamano = Server.CreateObject ("Scripting.FileSystemObject")
ruta = Server.MapPath("../html")
Set mi_dir = tamano.GetFolder(ruta)

Response.Write "El tamaño de la carpeta /HTML es " & mi_dir.Size & " Bytes
(" & round(mi_dir.Size/1048576,0) & " Megas)."








"Telerín" escribió en el mensaje
news:

Hola atodos.

¿Cómo puedo averiguar el tamaño de una carpeta de mi dominio? Incluyendo
subcarpetas y todos sus archivos.


Gracias.