Visualizzare file da una directory e fare il download

[Andreass]

Ciao a tutti: ho la cartella Public: e al suo interno altre cartelle: documenti ecc.
mettendo il codice che riporto qui mi compare solo la parola documenti ma non il suo contenuto: come dovrei fare ciò, e se volessi far scaricare al clik il file che si visualizza?
<%

Dim objFso, objFolder, objSubFolders, strFolder, strSubFolder
strPath = "public/"

Set objFso = Server.CreateObject("Scripting.FileSystemObject")
Set objFolder = objFso.GetFolder(Server.MapPath(strPath))
Set objSubFolders = objFolder.SubFolders

For Each strSubFolder in objSubFolders
Response.Write(strSubFolder.name & "
")
Next

Set objFso = Nothing
Set objFolder = Nothing
Set objSubFolders = Nothing

%>

Grazie mille

[Roby_72]

Devi scorrere i file di ogni cartella, magari al click con il mouse come su esplora risorse.
E devi mettere un link sul nome dei file.

Roby