FoxPro/Visual FoxPro - directirios(saber el tamaño)

Hola amigos espero que esten muy bien,,,
deseo saber el tamaño X directorio, y cargarlo en una variable, con el fin de comparar con el espacio de disco de 3 1/2, gracias a todos los que puedan aportar....................suerte desde colombia

Hola, espero que sirva

carpeta = 'c:\xxx\'
tfield=adir(archivos,carpeta+'*.*')
xsize = 0
for x=1 to tfield
xsize = xsize + archivos(x,2)
endfor
?'Total en Bytes ',xsize

Saludos desde PERU

CesarZ