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

Generar listado Archivos Subidos al Servidor...!

Estas en el tema de Generar listado Archivos Subidos al Servidor...! en el foro de ASP Clásico en Foros del Web. Hola mi consulta es la siguiente , en una web desarrollada ya tengo el script para subir archivos al servidor web. Lo que necesito ahora ...
  #1 (permalink)  
Antiguo 07/09/2008, 10:30
 
Fecha de Ingreso: enero-2005
Ubicación: Tucumán, Argentina
Mensajes: 57
Antigüedad: 19 años, 5 meses
Puntos: 0
Generar listado Archivos Subidos al Servidor...!

Hola mi consulta es la siguiente , en una web desarrollada ya tengo el script para subir archivos al servidor web. Lo que necesito ahora es una funcion que me muestre los archivos cargados en el directorio de Upcoads de archivos; es decir que lea el directorio muestra los nosbre de los archivos(.pdf) genere el link para descargarlos y me los ordene por fecha de subida la servidor ( es decir que ordene y aparezca primero en la lista el ultimo archivo cargado en el sistema).
Espero que me pudan ayudar con un ejmp. de codigo o funcion .. Desde ya muchas gracias .
  #2 (permalink)  
Antiguo 07/09/2008, 11:36
Avatar de JuanRAPerez
Colaborador
 
Fecha de Ingreso: octubre-2003
Mensajes: 2.393
Antigüedad: 20 años, 7 meses
Puntos: 27
Respuesta: Generar listado Archivos Subidos al Servidor...!

bueno LaBestiaPop

codigo no tengo a la mano pero te oriento


busca en las faq o en el web

- File System Object (FSO) - con ello listaras los archivos en tu directorio

suerte
__________________
JuanRa Pérez
San Salvador, El Salvador
  #3 (permalink)  
Antiguo 07/09/2008, 16:18
Avatar de Shiryu_Libra
Colaborador
 
Fecha de Ingreso: febrero-2007
Ubicación: Cantando "Screenager" en "Kirafa Kaput"
Mensajes: 3.614
Antigüedad: 17 años, 3 meses
Puntos: 88
Respuesta: Generar listado Archivos Subidos al Servidor...!

Verifica y cambialo a necesidad
Código PHP:
<&#37;
response.flush()
response.Buffer=true
'obtengo el directorio físico de la carpeta donde está este script
nombre_carpeta = Server.MapPath(".") & "\"
response.write "<h1>-" & nombre_carpeta & "</h1>"
    response.flush()

'
Conecto con el sistema de archivos
set FSO 
server.createObject("Scripting.FileSystemObject")

'creo el objeto carpeta
Set carpeta = FSO.GetFolder(nombre_carpeta)
    response.flush()

'
traigo los archivos de la carpeta
Set archivos 
carpeta.Files
para cada archivo
muestro su nombre.
response.Write "<h2>ROOT</h2>"
for each nombre_archivo in archivos
    tyfile 
fso.GetExtensionName(nombre_archivo.name)
    if 
tyfile="asp" then
    response
.Write "<br>" tyfile
    response
.Write " - " nombre_archivo.name
    end 
if
    
response.flush()
next 
__________________
"Eres parte del problema, parte de la solucion o parte del paisaje"
Un Saludo desde Desierto de Altar, Sonora, MX.
Shiryu_libra
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 01:59.