vise mængde i mappe

<%
dim fs,fo
set fs=Server.CreateObject("Scripting.FileSystemObject")
set fo=fs.GetFolder("c:\test")
Response.Write("The size of the folder test is: ")
Response.Write(fo.Size & " bytes.")
set fo=nothing
set fs=nothing
%>


Det giver eks.vis:
The size of the folder test is: 123456 bytes.

Skal du havde det i kb kan du dividere med 1024


Response.Write Round(fo.Size/1024,2) & " kb"

tak for det.