Foros del Web » Programando para Internet » ASP Clásico »

Recorrer directorios

Estas en el tema de Recorrer directorios en el foro de ASP Clásico en Foros del Web. ¿Alguien sabe como puedo recorrer los archivos y directorios contenidos en un directorio dado? Gracias y un saludo...
  #1 (permalink)  
Antiguo 08/01/2002, 13:07
 
Fecha de Ingreso: enero-2002
Ubicación: Graná
Mensajes: 646
Antigüedad: 22 años, 4 meses
Puntos: 0
Recorrer directorios

¿Alguien sabe como puedo recorrer los archivos y directorios contenidos en un directorio dado? Gracias y un saludo
  #2 (permalink)  
Antiguo 08/01/2002, 13:35
 
Fecha de Ingreso: enero-2002
Mensajes: 7
Antigüedad: 22 años, 3 meses
Puntos: 0
Re: Recorrer directorios

Pudes utilizar el objeto FilesystemObject, para hacer lo que tú quieres en el sitio de aspfacil.com, está un ejemplo muy sencillo...

suerte
  #3 (permalink)  
Antiguo 08/01/2002, 15:41
Avatar de rodvilleda  
Fecha de Ingreso: enero-2002
Mensajes: 182
Antigüedad: 22 años, 4 meses
Puntos: 0
Re: Recorrer directorios

tambien esta:

http://www.brainjar.com/asp/dirlist/
  #4 (permalink)  
Antiguo 09/01/2002, 14:03
 
Fecha de Ingreso: enero-2002
Ubicación: Graná
Mensajes: 646
Antigüedad: 22 años, 4 meses
Puntos: 0
Re: Recorrer directorios

gracias por responder,amigos. Ya he hecho todo esto y ahora tengo otro problema: como recorro los subdirectorios? al llamar recursivamente por primera vez a recorrer (con el primer subdirectorio, para listarlo), me da el error: Ruta de acceso no encontrada en la línea: set objFolder= objFSO.getfolder(Server.mappath(donde)). ¿Cual es el error?


Sub recorrer (donde)

dim objFSO, objFile, objFolder, veces, extension
set objFSO=server.createObject("Scripting.FileSys temObject")
set objFolder= objFSO.getfolder(Server.mappath(donde))
response.write "listado del directorio de "& objFolder.path &"<br>"
for each objfile in objfolder.files 'Recorre los ficheros del directorio raiz
response.write objfile.name
next
for each objsubfolder in objfolder.subfolders 'Recorre los subdirectorios del directorio actual
recorrer objsubfolder.name
next

set objfolder=nothing
set objfso=nothing

end sub

recorrer ("facultad")
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 20:57.