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

Número de fotos en una carpeta

Estas en el tema de Número de fotos en una carpeta en el foro de ASP Clásico en Foros del Web. ¿Alguien sabe como contar todas las fotos que están dentro de una carpeta, incluyendo todas las subcarpetas que hay en su interior.? Quisiera saber la ...
  #1 (permalink)  
Antiguo 10/11/2004, 18:32
 
Fecha de Ingreso: noviembre-2003
Ubicación: Madrid
Mensajes: 353
Antigüedad: 21 años, 5 meses
Puntos: 1
Número de fotos en una carpeta

¿Alguien sabe como contar todas las fotos que están dentro de una carpeta, incluyendo todas las subcarpetas que hay en su interior.?

Quisiera saber la cantidad de fotos que se almacenan en la mencionada carpeta, pero esta tiene dentro varios niveles de subcarpetas con fotos, quisiera poder contar TODAS, incluidas las de las subcarpetas, y si fuera posible, saber el espacio que ocupan.

Gracias
__________________
Lo menos frecuente en este mundo es vivir. La mayoría de la gente existe, eso es todo...
  #2 (permalink)  
Antiguo 10/11/2004, 18:41
Avatar de u_goldman
Moderador
 
Fecha de Ingreso: enero-2002
Mensajes: 8.031
Antigüedad: 23 años, 3 meses
Puntos: 98
Puedes modificar la sub del master AZ

http://www.forosdelweb.com/showthrea...ighlight=arbol

Código:
Por cada carpeta en unacarpeta
  Por cada archivo en carpeta
    Si right(archivo.name,3) = "jpg" o "gif" o "xxx"->extensión de imagen
      acumula = acumula + 1
    Fin si
  Next
Next
ai' ta la lógica

Salu2,
__________________
"El hombre que ha empezado a vivir seriamente por dentro, empieza a vivir más sencillamente por fuera."
-- Ernest Hemingway
  #3 (permalink)  
Antiguo 10/11/2004, 19:30
Avatar de lexus  
Fecha de Ingreso: enero-2002
Ubicación: Cali - Colombia
Mensajes: 2.234
Antigüedad: 23 años, 3 meses
Puntos: 4
este te muestra todos los archivos de una carpeta.

<%
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
%>
__________________
Control de Visitantes, Control de Accesos, Minutas digitales, Manejo de Correspondencia
http://www.controldevisitantes.com
  #4 (permalink)  
Antiguo 11/11/2004, 03:09
 
Fecha de Ingreso: noviembre-2004
Ubicación: Sevilla
Mensajes: 139
Antigüedad: 20 años, 5 meses
Puntos: 0
Cita:
Iniciado por lexus
este te muestra todos los archivos de una carpeta.

<%
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
%>

en q se basa para ordenar los resultados¿?

hay alguna manera xa que muestre primero los recien subidos al servidor?

un saludo
  #5 (permalink)  
Antiguo 11/11/2004, 08:05
Avatar de lexus  
Fecha de Ingreso: enero-2002
Ubicación: Cali - Colombia
Mensajes: 2.234
Antigüedad: 23 años, 3 meses
Puntos: 4
pues la verdad no se, pero si debe haber la forma.. debes probar en el formulario donde subes los archivos, colocale un campo mas, que sea oculto y que lleve la fecha y hora, y esta la guardas en la base de datos con el nombre del archivo, asi lo podras organizar como quieras.. mira bien las demas funciones de filesystemobject esta tiene muchas funciones como ultimaves quese modifico un archivo o demas cosas qeu depronto te pueden servir,..
suerte.
__________________
Control de Visitantes, Control de Accesos, Minutas digitales, Manejo de Correspondencia
http://www.controldevisitantes.com
  #6 (permalink)  
Antiguo 11/11/2004, 12:26
 
Fecha de Ingreso: noviembre-2004
Ubicación: Sevilla
Mensajes: 139
Antigüedad: 20 años, 5 meses
Puntos: 0
gracias por responder

el problema es que lo que me gustaria mostrar ordenado son unos archivos q no estan guardado en ninguna base de datos :S

un saludo
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 16:43.