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

Listar ficheros con extensión JPG

Estas en el tema de Listar ficheros con extensión JPG en el foro de ASP Clásico en Foros del Web. Hola, Estoy haciendo una web en la que en una sección determinada aparece un listado completo de los ficheros de una carpata. Esto lo hago ...
  #1 (permalink)  
Antiguo 18/03/2007, 14:43
Avatar de koaxial  
Fecha de Ingreso: agosto-2001
Mensajes: 119
Antigüedad: 22 años, 9 meses
Puntos: 0
Listar ficheros con extensión JPG

Hola,

Estoy haciendo una web en la que en una sección determinada aparece un listado completo de los ficheros de una carpata. Esto lo hago con un FileSystemObject y un bucle que los va mostrando. Funciona perfectamente.

Lo que ahora necesito es listar los ficheros de una carpeta, pero que de modo qué sólo me muestre los archivos con extensión JPG de esa carpeta y además empiecen por m_ , es decir

m_nombredelarchivo.jpg

Si fuese con un mandato DIR del MSDOS sería así:
DIR m_*.jpg

¿Cómo puedo hacerlo?

Gracias
  #2 (permalink)  
Antiguo 18/03/2007, 14:58
 
Fecha de Ingreso: noviembre-2004
Ubicación: Sevilla
Mensajes: 139
Antigüedad: 19 años, 7 meses
Puntos: 0
Re: Listar ficheros con extensión JPG

left(fso("filename"),2)="m_" and right(fso("filename"),4)=".jpg"

saludos
__________________
Punkis De Mierda

Foro punk rock
  #3 (permalink)  
Antiguo 18/03/2007, 15:11
Avatar de koaxial  
Fecha de Ingreso: agosto-2001
Mensajes: 119
Antigüedad: 22 años, 9 meses
Puntos: 0
Re: Listar ficheros con extensión JPG

Gracias por la respuesta, pero... ¿Cómo lo implemento?

Ahora mismo estoy listando los ficheros así:

Dim objFSO
Dim objFile
Dim objFolder
Dim sMapPath
Set objFSO = CreateObject("Scripting.FileSystemObject") sMapPath = "C:\RUTA"
Set objFolder = objFSO.GetFolder(sMapPath)

For Each objFile In objFolder.Files
Response.Write objFile.Name
Next
  #4 (permalink)  
Antiguo 18/03/2007, 16:02
 
Fecha de Ingreso: noviembre-2004
Ubicación: Sevilla
Mensajes: 139
Antigüedad: 19 años, 7 meses
Puntos: 0
Re: Listar ficheros con extensión JPG

For Each objFile In objFolder.Files

if left(objFile.Name,2)="m_" and right(objFile.Name,4)=".jpg" then Response.Write objFile.Name

Next

con esto seguirás recorriendo todas las imágenes, pero solo mostrará las que quieres
__________________
Punkis De Mierda

Foro punk rock
  #5 (permalink)  
Antiguo 18/03/2007, 16:43
Avatar de koaxial  
Fecha de Ingreso: agosto-2001
Mensajes: 119
Antigüedad: 22 años, 9 meses
Puntos: 0
Re: Listar ficheros con extensión JPG

¡Un millón de gracias!
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:29.