|
Узнать размер директории
|
|||
---|---|---|---|
#18+
Подскажите, как узнать размер директории? Ни в %File, ни в задокументированном $zu не нашел. Пока что использую такой метод: /// Get directory size in bytes ClassMethod GetDirectorySize(dir As %String, recursive As %Boolean = "1") As %Integer { set size=0 if ##class(%File).DirectoryExists(dir) { set rs=##Class(%ResultSet).%New("%File.FileSet") do rs.Execute(dir,"*",,1) // build result set of all files in dir while rs.Next() { if rs.Get("Type")'="D" //check for directories { set size = size + rs.Get("Size") } else { if (recursive=1) { set size = size + ..GetDirectorySize() } } } } quit size } ... |
|||
:
Нравится:
Не нравится:
|
|||
24.03.2014, 18:52 |
|
|
start [/forum/topic.php?fid=39&fpage=21&tid=1556924]: |
0ms |
get settings: |
11ms |
get forum list: |
15ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
68ms |
get topic data: |
13ms |
get forum data: |
3ms |
get page messages: |
50ms |
get tp. blocked users: |
2ms |
others: | 284ms |
total: | 454ms |
0 / 0 |