Fso: far apparire la prima foto di una cartella

[tosk]

Salve a tutti, ho creato una pagina per un cliente fotografo che, con fso, riconosce le cartelle di foto che lui andrà a caricare via ftp (ne ha parecchie centinaia al colpo). Aprendo il link verranno, sempre con fso, elencate tutte le foto con autoresize e con link all'ingrandimento.
Avrei però bisogno, nella pagina con l'elenco cartelle di far apparire la prima foto, o una delle foto in essa contenute.
Fattibile?
Ecco il codice

<%
	path = Server.MapPath("/shop/") 
	Set FSO = Server.CreateObject("scripting.FileSystemObject") 
	Set Folder = FSO.GetFolder(path)
	Set Subfolder = Folder.SubFolders 

	'creo la tabella con le anteprime
	   iColonne = 4 'imposto il numero delle colonne della tabella
		
		i = 0 'settiamo il contatore di comodo a zero
		
		For Each Cartella In Subfolder
		nomecartella = Cartella.name
		nomecartella = replace(nomecartella,"-"," ")
		i = i + 1
				
		If i = 1 Then 'se il contatore vale 1 allora inizializziamo riga
		Response.Write "<tr>" & VBCrLf
		End If
		
		%>
        <td width="140" align="center" valign="top"> <a href="shop_lista.asp?dir=<%=cartella.name%>"> 
          <font size="3"><%=nomecartella%></font></a></td>
        <%
	  If i MOD iColonne = 0 Then 
				Response.Write "</tr>" & VBCrLf
				End If 

	  Next %>
      </table>

grazie

[Roby_72]

Devi scorrere i file contenuti nella cartella...

Roby

[tosk]

non vorrei sembrare scortese, ma come suggerimento non mi risolve la situazione...

[Roby_72]

Tu scorri le cartelle e le sotto cartelle.
Per far vedere i file contenuti devi scorrere questi ultimi nelle cartelle.
Ad esempio:
http://www.w3schools.com/asp/coll_files.asp

Roby

[tosk]

Ma facendo un ciclo "For each file" mi vengono tutti i files della cartella. Mi serve solo il primo, o uno di essi

[Roby_72]

Se non conosci il nome puoi iniziare il ciclo, recuperare il primo ed uscire dal ciclo.
Altrimenti come fai a stampare il file senza il nome?

Roby

[tosk]

Ok, nonostante la mia testaccia ce l'ho fatta. Ho impostato una variabile che si riempie col nome dei files. Se la variabile non risulta vuota allora mette la foto, altrimenti si interrompe il ciclo.
Grazie mille.