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