Страница 1 из 1
Программа просмотра размера папок
Добавлено: 15 сен 2005, 07:11
Avsha
Всегда хотел иметь под рукой программу просмотра размера папок для указанного диска или папки.
Типа ходишь по дереву папок диска, а справа в виде таблицы и круговой диаграммы приводяться размеры всех папок, находящхся внутри указанной в дереве.
Для чистки диска удобно.
Может кто подскажет, как для указанной папки прочитать размеры всех папок, находящихся внутри?
Добавлено: 15 сен 2005, 11:41
treider
Что касается VBA то получить размер папки можно так
Код: Выделить всё
Sub GetFolderSize()
Dim FS As FileSystemObject
Dim MyFolder As Folder
Set FS = CreateObject("Scripting.FileSystemObject")
Set MyFolder = FS.GetFolder(InputBox("Ïóòü ê ïàïêå"))
MsgBox (MyFolder.Size)
End Sub
но я не думаю, что все так просто. Если снимать статистику при переходе между папками то компьютер будет подвисать.
Добавлено: 16 сен 2005, 07:59
Avsha
Спасибо, попробую использовать,
про FileSystemObject на хорошую ссылку наткнулся:
http://vfpkz.narod.ru/_0L401JSFF.htm
Готовой программы такого рода никто не встречал?
Добавлено: 26 окт 2005, 10:59
VG
http://www.win.tue.nl/sequoiaview/ - отличная программа визуального сравнения размеров папок с кучей настроек. Весь диск на одной странице.
Добавлено: 26 окт 2005, 13:11
Avsha
спасибо VG,
программа понравилась, нашел сразу море крупного мусора на своем ПК.
Только не нашел табличного представления размера папок в программе,
но может выйдет в будущих версиях функция типа экспорт данных о размерах папок в Excel... (???)