ho il seguente codice per visualizzare gli album contenuti in una directory:

codice:
<%
response.expireS=-100
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
Set Cartella = objFSO.GetFolder(Server.mappath("public\"))
response.write "Elenco Album di "&server.mappath("public\")&""
 
' Se volete visualizzare i files mettete
' For Each objItem In cartella.files


  response.write "<table width=750><tr>"
For Each objItem In cartella.SubFolders
  response.write "<td width=150 valign=top><a href='public/"&objItem.name&"'>"&objItem.Name&"
Dimensioni: "& objItem.Size & "Bytes""</a></td>"
Next
  response.write "</tr><table>"

%>
visualizza le cartelle/album contenute nella directory public! però mi visualizza solo i nomi delle cartelle!
vorrei far visualizzare l'immagine di uancartella grande oppure un'immagine casuale di quella cartella!
e vorrei poter visualizzare n album per ogni riga (es. 4 album per ogni riga), adesso sono tutti visualizzati su un'unica riga!

come posso fare?

Grazie