Ver Mensaje Individual
  #16 (permalink)  
Antiguo 03/07/2012, 19:41
fabian23
 
Fecha de Ingreso: abril-2012
Mensajes: 93
Antigüedad: 12 años
Puntos: 0
Respuesta: abrir pdf en asp

Cita:
Iniciado por prod6 Ver Mensaje
entiendo...
nunca he usado la subrutina que estas usando (ShowSubFolders) pero en pocas palabras lo que ese error significa es que tu estas tratando de abrir un directorio del tipo

"C:\inetpub\wwwroot\cummins\CHFS\" & archivo --> phyiscal

cuando en realidad tendrías que abrir un directorio del tipo

"http://localhost/cummins/CHFS/" & archivo --> virtual

encuentra la manera de traducir el primero en el segundo y el archivo se abrirá...
de todas maneras esperemos a ver si estoy en lo cierto...

pd: una manera muy util de orientarse cuando no estamos familiarizados con el codigo es hacer un archivo de log
cambia tu rutina por esta y muestrame lo que dice el archivo Log.log:

Código:
Sub ShowSubFolders(Folder)
            Dim ls
            Set ls = Server.CreateObject("Scripting.FileSystemObject")
            Set LogFile = ls.CreateTextFile("Log.log")
            For Each Subfolder in Folder.SubFolders
 
                
                Set objFolder = objFSO.GetFolder(Subfolder.Path)
                Set colFiles = objFolder.Files
 
                For Each objFile in colFiles
 
                    if dato & ".pdf" = objFile.Name then
 
                    archivo =  Subfolder.Path &"\"& objFile.Name 
                     
                     LogFile.WriteLine(archivo)
                    
                   'Response.Redirect(Request.QueryString("archivo"))
                    Response.Write (archivo)
                  
                    end if
                
                Next
                
                ShowSubFolders Subfolder
            
            Next
 
        End Sub
pd2: otra cosa, yo el Response.Redirect(archivo) lo pondría fuera del bucle For y pondría un Break o un Exit Sub en cuanto el archivo sea hallado...
no me mando ningun archivo

que tal me mando esto Error de Microsoft VBScript en tiempo de ejecución error '800a0046'

Permiso denegado

/cummins/buscar20.asp, línea 24

yo me pregunto no sera un error de permisos en el servidor? ya que si le doy en probar la conexion en mi administrador IIS en mi sitio me manda un error de autorizacion no sera eso?? muchas gracias por contestar


mira el error que te digo es este:

No se puede verificar el acceso a la ruta de acceso
El servidor está configurado para utilizar autenticación de paso a través con una cuenta integrada a la hora de tener acceso a la ruta de acceso física especificada. Sin embargo, el Administrador de IIS no puede verificar si la cuenta integrada tiene acceso. Asegúrese de que la identidad del grupo de aplicaciones tiene acceso de lectura para la ruta física. Si este servidor está unido a un dominio, y la identidad del grupo de aplicaciones es NetworkService o LocalSystem, verifique que <dominio>\<nombre_equipo>$ tiene acceso de lectura a la ruta de acceso física. A continuación, pruebe de nuevo esta configuración.


ya arregle lo del problemita de arriba pero le doy click al boton y no me arroja nada !!!! :S no se que hacer aaaaaaaaaaaaaaaaaaaa :S investigare como cambiar una ruta fisica a virtual


tu como le arias?? para un buscador de archivos? :S


no sera que no lo tengo montado en un servidor??? esque ya ni se que sea ya me desespere !!!! :S

Última edición por fabian23; 03/07/2012 a las 20:55