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

Crear Link usando Scripting.FileSystemObject

Estas en el tema de Crear Link usando Scripting.FileSystemObject en el foro de ASP Clásico en Foros del Web. Hola, tengo una duda, explico brevemente mi caso. necesito hacer una pagina en ASP, donde pueda ver mediante links unos archivos que estan en el ...
  #1 (permalink)  
Antiguo 09/02/2009, 18:56
 
Fecha de Ingreso: octubre-2008
Mensajes: 19
Antigüedad: 15 años, 7 meses
Puntos: 0
Crear Link usando Scripting.FileSystemObject

Hola, tengo una duda, explico brevemente mi caso.

necesito hacer una pagina en ASP, donde pueda ver mediante links unos archivos que estan en el servidor, los usuarios van grabando archivos pdf, en una carpeta con el siguiente nombre 1SI140109.PDF, siempre va cambiando por la fecha o el id o si fue aceptado o no.

donde el primer numero es mi ID los dos segundos significan que fue aceptado y los siguientes seis digitos es la fecha.

que puedo hacer para que me muestre los de un solo ID, que me diga si fue aceptado o no y la fecha.

he intentado algo con esto
Código:
<% 
'obtengo el directorio físico de la carpeta donde está este script 
nombre_carpeta = Server.MapPath(".") & "\documentos\" 
'response.write "<h1>-" & nombre_carpeta & "</h1>" 

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

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

'traigo los archivos de la carpeta 
Set archivos = carpeta.Files 

'para cada archivo, muestro su nombre. 
for each nombre_archivo in archivos 
response.Write "<li><a href=""" & nombre_archivo &""" target=""_blank"">en proceso</a></li>"
next 
%>
no me funciona el link pero con esto solo me muestra todo lo que esta en la carpeta como puedo hacerle un where ID y que me diga si fue aceptado y la fecha.

gracias
  #2 (permalink)  
Antiguo 10/02/2009, 15:59
Avatar de JuanRAPerez
Colaborador
 
Fecha de Ingreso: octubre-2003
Mensajes: 2.393
Antigüedad: 20 años, 7 meses
Puntos: 27
Respuesta: Crear Link usando Scripting.FileSystemObject

la verdad no entendí mucho la pregunta y hoy ando un poco lento pero te cuento

antes que nada no se cuantos pdf tengas pero me suenan que son muchos, deverias de guardarlos minimo (digo yo) con un _ para poder hacer un split y obtener mas fácil los valores

1_SI_140109

al hacer un split tienes los 3 valores separados y es mas fácil poder determinar lo de un año o mes en especial...

pero si no puedes hacerlo para un mejor trato puedes hacer lo siguiente

58951SI140109
+ mide cuanto tiene de longitud tu nombre de archivo
+ quilate 6 de derecha a izquierda y tendrás la fecha (colócala en una variable 140109)
+ luegio toma los otros dos valores (para saber si es SI o no)
+ el resto es tu id (58951)
+ luego si en tu filtro dice que quieres lo de la fecha 140109 si la variable fecha se cumple lo muestras si no no


suerte
busca info de MID; LEFT, RIGHT que son cosas que te servirán

suerte
__________________
JuanRa Pérez
San Salvador, El Salvador
  #3 (permalink)  
Antiguo 12/02/2009, 08:18
 
Fecha de Ingreso: octubre-2008
Mensajes: 19
Antigüedad: 15 años, 7 meses
Puntos: 0
Respuesta: Crear Link usando Scripting.FileSystemObject

Gracias Juan

Estoy haciendo lo que comentas al terminar trepo el codigo
  #4 (permalink)  
Antiguo 12/02/2009, 08:48
Avatar de JuanRAPerez
Colaborador
 
Fecha de Ingreso: octubre-2003
Mensajes: 2.393
Antigüedad: 20 años, 7 meses
Puntos: 27
Respuesta: Crear Link usando Scripting.FileSystemObject

oki suerte
__________________
JuanRa Pérez
San Salvador, El Salvador
  #5 (permalink)  
Antiguo 12/02/2009, 10:14
 
Fecha de Ingreso: octubre-2008
Mensajes: 19
Antigüedad: 15 años, 7 meses
Puntos: 0
Respuesta: Crear Link usando Scripting.FileSystemObject

ya funciono hice lo siguiente

Código [CODE]:
Ver original
  1. 'Creamos el objeto FileSystemObject
  2. Set fso = Server.CreateObject("Scripting.FileSystemObject")
  3. ' elegimos la carpeta 2009 desde la raiz del servidor web
  4. ' sustituir "/2009/" por la que lo que se necesite
  5. Set folder = fso.GetFolder(Server.MapPath("/2009/documentos"))
  6. Set files = folder.Files '
  7. ' construimos el Link ----------------------------------------
  8. For Each file in files
  9. 'Declaramos variables      
  10. fil=file.Name
  11. Idarchivo = left(file.Name,2) 'Extraemos el ID de los archivos PDF
  12. Idsesion = mid(file.Name,3,2) 'Extraemos el ID de sesion de los archivos PDF
  13. Idfecha = mid(file.Name,5,6)  'Extraemos la fecha de los archivos PDF

y con esto ya realize la consulta y me funciono correctamente.
  #6 (permalink)  
Antiguo 12/02/2009, 11:42
Avatar de JuanRAPerez
Colaborador
 
Fecha de Ingreso: octubre-2003
Mensajes: 2.393
Antigüedad: 20 años, 7 meses
Puntos: 27
Respuesta: Crear Link usando Scripting.FileSystemObject

ummm oki solo que en mi ejemplo te hice un nombre de archivo como este 58951SI140109.pdf

al pasarlo por tu funcion me quedaria

id = 58
sesion = 95
fecha = 1SI140

cierto??????

tu ejemplo era este
1SI140109.PDF

igual al pasarla por la funcion haria esto

id = 1S
sesion I1
fecha = 40109.

habria que ilvanar un poco mas para poder hacerla

puedes hacer algo asi

mi id es numerico si encuentras una letra (S o N) ahi muere mi id
mi sesion es caracter cuando en la cadena inicie un caracter desde ahi inicia mi sesion
ahora uso un right y extraigo los ultimos 6 que son mi fecha

suerte
__________________
JuanRa Pérez
San Salvador, El Salvador
  #7 (permalink)  
Antiguo 03/03/2009, 20:47
 
Fecha de Ingreso: octubre-2008
Mensajes: 19
Antigüedad: 15 años, 7 meses
Puntos: 0
Respuesta: Crear Link usando Scripting.FileSystemObject

Juan ahora me he topado con otro problema,

ahora resulta que ya he estado metiendo algunos archivos pero me piden ordenarlo por la fecha mas reciente.

y ahora si no se que hacer

si pudieras ayudarme con eso te lo agradeceria

saludos
  #8 (permalink)  
Antiguo 04/03/2009, 11:59
Avatar de JuanRAPerez
Colaborador
 
Fecha de Ingreso: octubre-2003
Mensajes: 2.393
Antigüedad: 20 años, 7 meses
Puntos: 27
Respuesta: Crear Link usando Scripting.FileSystemObject

ummmm
un poco d lectura estaria bien...

http://www.aspfaqs.com/aspfaqs/ShowFAQ.asp?FAQID=118

suerte
__________________
JuanRa Pérez
San Salvador, El Salvador
  #9 (permalink)  
Antiguo 04/03/2009, 17:25
 
Fecha de Ingreso: octubre-2008
Mensajes: 19
Antigüedad: 15 años, 7 meses
Puntos: 0
Respuesta: Crear Link usando Scripting.FileSystemObject

Muchas Gracias ya quedo funcinando
  #10 (permalink)  
Antiguo 04/03/2009, 19:08
Avatar de JuanRAPerez
Colaborador
 
Fecha de Ingreso: octubre-2003
Mensajes: 2.393
Antigüedad: 20 años, 7 meses
Puntos: 27
Respuesta: Crear Link usando Scripting.FileSystemObject

oki solo un consejo pega el codigo funcional quizas alguien mas teng ala duda y encuentre este enlace y poder ayudarle
__________________
JuanRa Pérez
San Salvador, El Salvador
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 02:10.