Esto se realiza mediante el FileSystemObject.
El ejemplo te lista el contenido de un directorio y de las carpetas del mismo.
Código:
<%
set FSO = Server.CreateObject("Scripting.FileSystemObject")
ver=request.querystring("ver")
'en esta variable esta el directorio a ver
set recepcion = FSO.GetFolder("unidad:\ruta\tu_carpeta\"& ver& "")
set subdir=recepcion.subfolders
response.write "<br><center><strong>Listado de directorios disponibles en la carpeta 'tu_carpeta'</strong></center>"
for each dir in subdir
%>
<br><a href="verdirectorio.asp?ver=<%=dir.name%>" target="principal" onmouseout="window.status='';return true" onmouseover="window.status='Listado de Archivos para el directorio <%=dir.name%>';return true">
<font color="#0000FF"><%=dir.name%></font></a>
<%
set directorios = nothing
set dir = nothing
next 'dir
set recepcion = nothing
%>
Un saludo!!
[email protected]