Henry's Remodel
<% Dim oFilesys, oFolder, oFile Set oFilesys= CreateObject("Scripting.FileSystemObject") Set oFolder= oFilesys.GetFolder(Server.MapPath("/remodel/")) For Each oFile in oFolder.Files Response.write oFile.Name Response.write "" Next Set oFolder=Nothing Set oFilesys=Nothing %>
