visualizzare file in cartella

[lucacasu]

Con questo visualizzi il contenuto di una cartella..

<%dir="/public"
Set file1 = CreateObject("Scripting.FileSystemObject")
Set file2 = file1.GetFolder(server.mappath("public"))
Set file3 = file2.Files
For Each file in file3
response.write "<A HREF='public/"
response.write file.name
response.write "'>"
response.write file.name
response.write "</A>
"
Next
%>