Ver Mensaje Individual
  #1 (permalink)  
Antiguo 05/05/2008, 17:51
Avatar de omegafunky
omegafunky
 
Fecha de Ingreso: diciembre-2003
Ubicación: Tabasco, Mexico
Mensajes: 3.534
Antigüedad: 21 años, 4 meses
Puntos: 33
Exclamación Problema con "Archivo no encontrado"

Hola amigos hando haciendo un gestor de archivos, los archivos se suben a una carpeta llamada "archivos" y se guarda el nombre de dicho archivo con todo y extension en la base de datos al igual que la persona que los subio, al momento de darle borrar, se borra el rehistro de la BD pero el archivo sige dentro de la carpeta y me marca el siguiente error:

Tipo de error:
Error de Microsoft VBScript en tiempo de ejecución (0x800A0035)
Archivo no encontrado
/it/subir_archivos.asp, línea 23

Código PHP:
<%
'fechale = Day(Date) &"/"& Month(Date) &"/"& Year(Date)
'
response.Write fechale
if request("id_archivo") <> "" then
    Set conn 
Server.CreateObject("ADODB.Connection")
    
conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="server.mappath("base.mdb")
    
    
SQL_ver "SELECT * FROM archivos WHERE id_archivo = " &Request("id_archivo")
    
Set rs_ver conn.Execute(SQL_ver)
    if 
Not rs_ver.EOF then

    SQL_del_file 
"DELETE FROM archivos WHERE id_archivo = " &Request("id_archivo")
    
Set rs_del_file conn.Execute(SQL_del_file)

    
set fs createobject("scripting.filesystemobject")
    
fs.deletefile "archivos\"&rs_ver("nombre")&"", true    '-----LINEA 23
    
    Response.Redirect("
subir_archivos.asp")
    end if
end if

%> 
__________________
Canon 7D | Canon 5D Mark II | 35mm 1.4L | 135mm 2L | Pocket Wizard Plus III