espacios de carpetas en href y asp

fabian23 · #1 (**permalink**) 16/07/2012, 07:41

Buenos dias como sabran e realizado un buscador de archivos pero ahora tengo un problema resulta que al querer abrir un link con una carpeta que tenga espacios !!!!! no me saca el link para poder abrir ela rchivo les ruego me puedan ayudar aqui les dejo mi codigo de busqueda

Código ASP:

Ver original<html>
<head><IMG style="FILTER: alpha(opacity=100, finishOpacity=0,style=1); WIDTH: 850px; HEIGHT: 100px" src="cummins2.jpg" />
 
<BODY background="ism.jpg">
</head>
  <body>
   
<% 
    Dim dato, ruta1, ruta
     dato = Request("busqueda")
           if dato = "" then   
             
             Response.Write("<script>alert('No ingreso dato a buscar');</script>") 
             Response.Write("<big><center>Aprieta el boton para Regresar<br><input type=""button""  value=""Regresar"" onclick = ""location='index.html'""/></center>")
             
              End if
                %>
                <% 
                 if dato <> "" then 
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.GetFolder(Server.MapPath("\proyecto\documentos\")) 
ruta=objFolder & "\"
 
 
Set SubFolders = objFolder.SubFolders 
 
For Each objFolder1 in SubFolders 
 
Set SubFolders1 = objFolder1.SubFolders
For each objFolder2 in SubFolders1
 
Set SubFolders2 = objFolder2.SubFolders
For each objFolder3 in SubFolders2
 
 
For Each objFile in objFolder3.Files
 
if dato & ".pdf" = objFile.Name then 
 
 encontrar1 = objFolder1.name : encontrar2 = objFolder2.name : encontrar3 = objFolder3.name : archivo = objFile.Name
 
ruta1 = ruta & encontrar1 & encontrar2 & "\" & encontrar3 & archivo  ' & encontrar1
ruta1=   encontrar1 & "\" & encontrar2 & "\" & encontrar3 & "\" & archivo
ruta1 = "\proyecto\documentos\" & ruta1
 
Response.Write("<big><b><center>Para abrir el archivo da click en el nombre</center></b><br>")
Response.Write "<center><li><a href =" & ruta1 &" target =_blank>" & objFile.Name&"</a></center><br>"
Response.End
 
existe = true
end if
 
 
 
 
 
 
 
next
next
next
next
if not existe then 
            response.Write ("<big><b><center>El archivo no existe</center></b></big><br>")
            Response.Write("<center>Aprieta el boton para Regresar<br><input type=""button""  value=""Regresar"" onclick = ""location='index.html'""/></center>")
            Response.End
            end if
end if
 
                
                
  
                
                %>
 
                <html>
                  </body>

ummm si nadamas quiero que esta instruccion que se encuentra arriba encontrar3 = objFolder3.name que es la que inspecciona la ultima carpeta me aparesca por ejemplo aso HOLA20%COMO20%ESTAS le intente con un server.URLEncode y el espacio me lo sustituyo por un signo mas !!! no hay nadie que me ayude??

gdasoft · #2 (**permalink**) 17/07/2012, 03:28

Hola de nuevo Fabian23,

Por lo que veo aun sigues liado con tu aplicación de busqueda de PDF :)

Tu problema actual cual es? No lo acabo de enteder.

Que la ruta te sale como C:\Carpeta%2001\Fichero.pdf y deseas quitarle el %20?

Si es eso con un replace tendria que ser suficiente.

un saludo

fabian23 · #3 (**permalink**) 17/07/2012, 07:22

Cita:

Iniciado por gdasoft

Hola de nuevo Fabian23,

Por lo que veo aun sigues liado con tu aplicación de busqueda de PDF :)

Tu problema actual cual es? No lo acabo de enteder.

Que la ruta te sale como C:\Carpeta%2001\Fichero.pdf y deseas quitarle el %20?

Si es eso con un replace tendria que ser suficiente.

un saludo

jajaja si te das cuenta volvi hacer el codigo jaja y pues ya me abre el pdf lo hice por partes para asi desaparecer el C:/ jaja ya solo me quedan las carpetas pero que creees !!!! que por ejemplo las carpetas tienen espacios por ejemplo Alcohol 1, alcohol 2, y en eso como que mi href o no se no lo concatena le intente ponerle a la variable contrar3 = Server.URLEncode y pues el espacio de la carpeta me lo pone algo asi Alcohol+1 y al darle click no me enlaza tendria que ser como alcohol%20para que me lo pueda agarrar como link pero no se como !!!

fabian23 · #4 (**permalink**) 17/07/2012, 10:00

Cita:

Iniciado por fabian23

jajaja si te das cuenta volvi hacer el codigo jaja y pues ya me abre el pdf lo hice por partes para asi desaparecer el C:/ jaja ya solo me quedan las carpetas pero que creees !!!! que por ejemplo las carpetas tienen espacios por ejemplo Alcohol 1, alcohol 2, y en eso como que mi href o no se no lo concatena le intente ponerle a la variable contrar3 = Server.URLEncode y pues el espacio de la carpeta me lo pone algo asi Alcohol+1 y al darle click no me enlaza tendria que ser como alcohol%20para que me lo pueda agarrar como link pero no se como !!!

BUENO PUES CON LA NOTICIA DE QUE YA ME SALIO LO QUE HICE PARA SOLUCIONAR ESTO SI ALGUIEN LE SIRVE Y ALGUN DIA LO LLEGAN A NECESITA EN MI CODIGO QUE PEGUE AL ULTIMA IGUALUACION DE ruta1 la puse asi:

ruta1 = replace(ruta1," ","%20") y funciono ay les dejo el buscador de archivos y la solucion para que no batallen como yo si son principianetes en asp como yo jeje asta luego

gdasoft · #5 (**permalink**) 18/07/2012, 03:38

Muy bien Fabian23, al final hiciste lo que te comente, utilizar un simple replace para substituir el caracter.

Me alegro de que ya tengas la aplicación funcionando y ¡antes de que te acabe el plazo!

:)

Un saludo

fabian23 · #6 (**permalink**) 18/07/2012, 08:27

Cita:

Iniciado por gdasoft

Muy bien Fabian23, al final hiciste lo que te comente, utilizar un simple replace para substituir el caracter.

Me alegro de que ya tengas la aplicación funcionando y ¡antes de que te acabe el plazo!

:)

Un saludo

hola que tal !!! si muchas gracias y esque el replace lo habia aplicado en una variable mas arriba pero no funciono jajaja y asta que lo cale ahi jeje pues si ahora a montarlo en el servidor haber qeu tal presiento que tendre que usar directorios virtuales remotos

gdasoft · #7 (**permalink**) 20/07/2012, 05:57

Hola majo!

Ya me contaras que tal te funciona la aplicación en tu servidor.

Un saludo