>409
set fs=server.createobject("Scripting.FileSystemObject")
set fld=fs.GetFolder(server.mappath("/"))
for each fl in fld.files
response.write(fl.name & "<br>")
next