Fácil tio, solo tienes que hacer una pequeña trampa, tu lo haces así
   Cita:  
					Iniciado por Brewster  <%
 
caminoFich=Server.MapPath("./carpetas//")
set ficheros=fso.GetFolder(caminoFich)
For each filefound in ficheros.files
     response.write(filefound.Name)
Next
%>
    Pues símplemente rompe el bucle y listo  
Código:
 <%
				 
caminoFich=Server.MapPath("./carpetas//")
set ficheros=fso.GetFolder(caminoFich)
For each filefound in ficheros.files
     response.write(filefound.Name)
     exit for
Next
%>