Mostrando el contenido de una carpeta en el servidor
Este es un código que utiliza el objeto FileSystem, buscando todos los archivos que existen dentro de una carpeta
en nuestro servidor.
En el ejemplo, usamos el método GetFolder del objeto FileSystem, para "capturar" el contenido de una carpeta específica
Luego, con un bucle For Each y al mismo tiempo usando la propiedad Files del objeto Folder
recien creado, podemos recorrer todos los archivos que contiene esa carpeta.
La carpeta que se muestra en este ejemplo se llama mis_archivos. Asi que deben configurar ese fragmento de código y
poner lo que uds quieran......
<%
Set fs = Server.CreateObject("Scripting.FileSystemObject")
Set lista_archivos = fs.GetFolder(Server.MapPath("./mis_archivos"))
'Mostramos los archivos...
For each filefound in lista_archivos.files
Response.Write filefound.Name & "<BR>"
Next
%>
|
|
