set objFso = createobject("scripting.filesistemobject")

set objCartella = objfso.getfolder(pathcartelladacontrollare)

dimensioni = objCartella.size ... ciao ne