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

FileExists

Estas en el tema de FileExists en el foro de ASP Clásico en Foros del Web. buenas tardes tengo un problema !!! necesito hacer un buscador que acceda en los directorios de windows es decir que el usuario con solo ingresar ...
  #1 (permalink)  
Antiguo 01/06/2012, 15:27
 
Fecha de Ingreso: abril-2012
Mensajes: 93
Antigüedad: 7 años, 5 meses
Puntos: 0
Exclamación FileExists

buenas tardes tengo un problema !!! necesito hacer un buscador que acceda en los directorios de windows es decir que el usuario con solo ingresar el nombre del archivo lo pueda abrir primero que nada quiero que mi programa o pagina al momento de recibir el nombre del archivo vea si existe el archivo pero no me arroja nada :S mi codigo es el siguiente en html y ASP

Código PHP:
form method="post" action="buscar.asp">
<
center><b><font color="black">Node Serie:</font><input type="text" name="busqueda" /> </></b><center>
<
center><input type="submit" value="Buscar"></center
y en ASP tengo el siguiente
Código PHP:
<% Dim fsoarchivodato
dato 
request.Form("busqueda")

Set fso server.CreateObject("Scripting.FileSystemObject")
if 
fso.FileExists ("C:/Users/Fabian/Documents/CHFS/" dato ".txt") = true then 
Response
.Write "True"

end if
%> 
el que tengo y ewstoy poniendo cmo dato se llama casa.txt para que me arroje si existe el txt pero en realidad quiero abrir pdfs estoy iniciandolo por eso mi duda espero me ayuden
  #2 (permalink)  
Antiguo 04/06/2012, 13:52
Avatar de JuanRAPerez
Colaborador
 
Fecha de Ingreso: octubre-2003
Mensajes: 2.393
Antigüedad: 16 años
Puntos: 27
Respuesta: FileExists

y te da algun error?
__________________
JuanRa Pérez
San Salvador, El Salvador
  #3 (permalink)  
Antiguo 04/06/2012, 14:05
 
Fecha de Ingreso: abril-2012
Mensajes: 71
Antigüedad: 7 años, 6 meses
Puntos: 16
Respuesta: FileExists

las barras van invertidas
if fso.FileExists ("C:\Users\Fabian\Documents\CHFS\" & dato & ".txt") = true
o en su defecto
if fso.FileExists (Server.MapPath("C:/Users/Fabian/Documents/CHFS/" & dato & ".txt")) = true

Última edición por prod6; 04/06/2012 a las 14:26
  #4 (permalink)  
Antiguo 04/06/2012, 15:42
 
Fecha de Ingreso: abril-2012
Mensajes: 93
Antigüedad: 7 años, 5 meses
Puntos: 0
Respuesta: FileExists

Cita:
Iniciado por JuanRAPerez Ver Mensaje
y te da algun error?
pues mi codigo lo e corregido muchas veces pero no me devuelve nada :S me da el error de an error ocurred on the server when processing the URL. Please contact the system administrator

if you are the system administrator please click here to find out more about this error
  #5 (permalink)  
Antiguo 04/06/2012, 15:45
 
Fecha de Ingreso: abril-2012
Mensajes: 93
Antigüedad: 7 años, 5 meses
Puntos: 0
Respuesta: FileExists

Cita:
Iniciado por prod6 Ver Mensaje
las barras van invertidas
if fso.FileExists ("C:\Users\Fabian\Documents\CHFS\" & dato & ".txt") = true
o en su defecto
if fso.FileExists (Server.MapPath("C:/Users/Fabian/Documents/CHFS/" & dato & ".txt")) = true
ya lo intente y tampoco me manda el error que le mande a la persona que contesto primero aqui abajio :S no se que sea!!! mi dato lo modifique asi y no queda ...

Código PHP:
<%
Dim fsodato 
dato 
request.Form("busqueda")

    
Set fso server.CreateObject("Scripting.FileSystemObject")


if 
dato ="" then Response.Write "No se ingreso dato a buscar"
else  fso.FileExists ("C:/Users/Fabian/Documents/CHFS/" dato & )  then  
          Response
.Write "True"    
else      Response.Write "False"

    
end if
set fso=nothing

 
%> 
y me arroja el error :S no se que hacer
  #6 (permalink)  
Antiguo 04/06/2012, 15:47
Avatar de JuanRAPerez
Colaborador
 
Fecha de Ingreso: octubre-2003
Mensajes: 2.393
Antigüedad: 16 años
Puntos: 27
Respuesta: FileExists

haz probado
colocandole privilegios al usuario

iusr al directorio CHFS
__________________
JuanRa Pérez
San Salvador, El Salvador
  #7 (permalink)  
Antiguo 04/06/2012, 16:37
Avatar de IsaBelM
Colaborador
 
Fecha de Ingreso: junio-2008
Mensajes: 5.032
Antigüedad: 11 años, 3 meses
Puntos: 1011
Respuesta: FileExists

traigo el código que posteaste en el foro de js

el primer error es la condicional y el segundo es la concatenación
Cita:
<%
Dim fso, dato
dato = Request.Form("busqueda")

Set fso = server.CreateObject("Scripting.FileSystemObject")

if dato ="" then
Response.Write "No se ingreso dato a buscar"
elseif fso.FileExists ("C:/Users/Fabian/Documents/CHFS/" & dato) = true then
Response.Write ("File C:/Users/Fabian/Documents/CHFS/" & dato & "exists!")
else
Response.Write ("File C:/Users/Fabian/Documents/CHFS/" & dato & "does not exists!")

end if
set fso=nothing

%>
__________________
if(ViolenciaDeGénero) {alert('MUJER ASESINADA');}
  #8 (permalink)  
Antiguo 04/06/2012, 19:21
 
Fecha de Ingreso: abril-2012
Mensajes: 93
Antigüedad: 7 años, 5 meses
Puntos: 0
Respuesta: FileExists

Cita:
Iniciado por IsaBelM Ver Mensaje
traigo el código que posteaste en el foro de js

el primer error es la condicional y el segundo es la concatenación



graciaaaaaaaaaas !!!!!!!!!!! eres un amor !!! ahora me manda que ningun fichero existe deja ver como solucionarlo tengo el tiempo encima :S tengo que hacer un buscador de archivos y me quedan dos meses y no le se a ASP :( !!!! te lo agrades dios te lo pague
  #9 (permalink)  
Antiguo 05/06/2012, 11:05
 
Fecha de Ingreso: abril-2012
Mensajes: 93
Antigüedad: 7 años, 5 meses
Puntos: 0
Respuesta: FileExists

Cita:
Iniciado por JuanRAPerez Ver Mensaje
haz probado
colocandole privilegios al usuario

iusr al directorio CHFS
muchas gracias tambn es eso !! si tengo los archivos en la carpeta donde tengo la aplicacion osea el inetpub si los encuentra pero si los tengo en documents no !!
  #10 (permalink)  
Antiguo 05/06/2012, 13:54
Avatar de JuanRAPerez
Colaborador
 
Fecha de Ingreso: octubre-2003
Mensajes: 2.393
Antigüedad: 16 años
Puntos: 27
Respuesta: FileExists

es una tarea la que estas haciendo?
__________________
JuanRa Pérez
San Salvador, El Salvador
  #11 (permalink)  
Antiguo 06/06/2012, 07:10
 
Fecha de Ingreso: abril-2012
Mensajes: 93
Antigüedad: 7 años, 5 meses
Puntos: 0
Respuesta: FileExists

Cita:
Iniciado por JuanRAPerez Ver Mensaje
es una tarea la que estas haciendo?
buenos dias es un proyecto !!! es un buscador de archivos es para poder terminar mis estudios pero yo le se a PHP y me salieron con que no lo puedo usar por el servidor y en ASP no se nada :S y tengo 2 meses para terminar
  #12 (permalink)  
Antiguo 12/06/2012, 13:34
 
Fecha de Ingreso: abril-2012
Mensajes: 93
Antigüedad: 7 años, 5 meses
Puntos: 0
Exclamación Respuesta: FileExists

Cita:
Iniciado por IsaBelM Ver Mensaje
traigo el código que posteaste en el foro de js

el primer error es la condicional y el segundo es la concatenación
hola como as estado necesito de tu ayuda!!!!! tengo un codigo el cual me hace una busqueda recursiva y me arroja las direcciones de los archivos en carpetas y subcarpetas esto con el objFSO.GetFolder (objStartFolder) ahora lo que requiero es que solo me arroje pero el que el usuario ingrese y mi idea es juntar ese objeto con el FileExists como vez?? si estoy bien?? uso el Getfolder para que me recorra directorios y subidrectoiros y el fileexists para que me tome el dato del usuario y arrojarlo ya de ahi ps ponerlo que sea link para que se pueda abrir como vez?
  #13 (permalink)  
Antiguo 17/06/2012, 19:05
 
Fecha de Ingreso: abril-2012
Mensajes: 93
Antigüedad: 7 años, 5 meses
Puntos: 0
Respuesta: FileExists

Cita:
Iniciado por IsaBelM Ver Mensaje
traigo el código que posteaste en el foro de js

el primer error es la condicional y el segundo es la concatenación

me podrias ayudar por favor !!!!!! mi codigo es el siguiente html:
Código PHP:
<BODY

<
center><b><font color="black">BUSQUEDA DE CHFS</b></center
<
form method="post" action="buscar5.asp"
<
center><b><font color="black">Node Serie:</font
<
input type="text" name="busqueda" /> </></b></center
<
center><input type="submit" value="Buscar"></center

 </
form
y mi ASP es este
Código PHP:
<% 
Dim fsodato  
dato 
Request.Form("busqueda")  
            
if 
dato ="" then  
Response
.Write ("<center><b><big>No se ingreso dato a buscar</big></b></center>")  
else  
'fso.FileExists ( dato &  ".pdf") then 
Set objFSO = CreateObject("Scripting.FileSystemObject") 
objStartFolder = "C:\inetpub\wwwroot\cummins\CHFS\" 
Set objFolder = objFSO.GetFolder(objStartFolder) 
  '
response.write "<br>"&objFolder.Path&"<br>"&"<br>" 
Set colFiles objFolder.Files 
For Each objFile in colFiles 
  
'response.write objFile.Name&"<br>" 
      Next 
ShowSubfolders objFSO.GetFolder(objStartFolder) 

Sub ShowSubFolders(Folder) 
   For Each Subfolder in Folder.SubFolders 
    '  
response.write "<br>"&Subfolder.Path&"<br>"&"<br>" 
        
Set objFolder objFSO.GetFolder(Subfolder.Path
        
Set colFiles objFolder.Files 
        
For Each objFile in colFiles 
     
'     response.write objFile.Name&"<br>" 
        Next 
        ShowSubFolders Subfolder 

            Next     
   '
end sub 
    
for each Files in colFiles 

Set fso 
server.CreateObject("Scripting.FileSystemObject")  

    if 
fso.FileExists dato &  ".pdf"then   
 Response
.Write ("File C:/Users/Fabian/Documents/CHFS/" dato "<b><big><li>El archivo existe!</li></big></b>")  
else  
Response.Write ("File C:/Users/Fabian/Documents/CHFS/" dato "<b><big><li>El archivo no existe!</li></big></b>")  
 
end if 
   
next 
End Sub 
Response
.Write ("File" dato "<b><big><li>El archivo si existe!</li></big></b>")  
 
end if 

%> 
el chiste es que quiero que se meta en los directorios y me compruebe si existe el archivo que busca el usuario no se como hacerle :S !!!!

Etiquetas: asp, server
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

SíEste tema le ha gustado a 1 personas




La zona horaria es GMT -6. Ahora son las 04:55.