<% Set MyFileSize = Server.CreateObject ("Scripting.FileSystemObject") MyPath = Server.MapPath("/") Set MyFolder = MyFileSize.GetFolder(MyPath) %>

<% =MyPath %> is <% =MyFolder.Size %> bytes