11. august 2005 - 10:05Der er
15 kommentarer og 1 løsning
Størrelsen på en mappe på serveren.
Jeg skal bruge et lille stykke kode der kan fortælle mig hvor meget der ligger i en bestemt mappe på min server - altså i kilobytes. Filernes type i mappen veksler af type... ikke at jeg tror det har nogen betydning-
folderToCheck = Server.MapPath("/sandkassen") set fso = Server.CreateObject("Scripting.FileSystemObject") set fldr = fso.GetFolder(folderToCheck) size = 0 for each fl in fldr.Files size = size + fl.Size next set fldr = nothing set fso = nothing
softspot >> hmm skal man tage størrelsen på mapperne individuelt, kan man ikke bare nøjes med størrelsen på den aktuelle mappe? troede egentlig den tog hele størrelsen så
jeg vil mene at følgende giver det hele -- set fso = Server.CreateObject("Scripting.FileSystemObject") set fldr = fso.GetFolder("STI") response.write fldr.size
dvs sådan her og så er det i KB --- set fso = Server.CreateObject("Scripting.FileSystemObject") set fldr = fso.GetFolder("STI") response.write fldr.size/1024 & "KB"
I så fald kan du bruge denne: function folderSize(folder) set fso = Server.CreateObject("Scripting.FileSystemObject") Response.Write(folder) set fldr = fso.GetFolder(folder) size = 0 for each fl in fldr.Files size = size + fl.Size next for each fld in fldr.SubFolders size = size + folderSize(folder & "\" & fld.Name) next set fldr = nothing set fso = nothing folderSize = size end function
Men det må så betyde at hvis man kun skal bruge størrelse af selve mappen (uden undermapper), så er man nød til at gennemløbe og summere størrelsen af hver enkelt fil... :)
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.