<% Set fs = server.CreateObject("Scripting.FileSystemObject") Set pasta = fs.GetFolder("d:\hosting\mafiadolixo\documentos\") %> <% FOR EACH file IN pasta.Files %> <% NEXT %>

Nome Do arquivo	Tamanho Do arquivo	Tipo Do arquivo
<%=file.name%>	<%=formatnumber(file.size/1024)%> kb	<%=file.type%>