esto no va asi
Cita: Carpeta = server.mappath("C:/Inetpub/wwwroot/MiWeb/imagenes/")
por eso estamos utilizando la carpeta virtual
jamas encontrara la direccion, ya que seria
Cita: C:/Inetpub/wwwroot/MiWeb/C:/Inetpub/wwwroot/MiWeb/imagenes/
asi debe ser
Cita: Carpeta = server.mappath(".//imagenes/")
le estamos indicando que donde sea tu sitio web, de ahi parta y busque la carpeta imagenes
ahora el error que te aparece
Cita: Debe ser la primera instrucción de la línea
/Miweb/Eliminarportada.asp, línea 28, columna 33
fs.DeleteFile(carpeta & fichero) end if
es por que tienes el END IF en linea con otra instruccion, por eso el error
Cita: Carpeta = server.mappath("C:/Inetpub/wwwroot/MiWeb/imagenes/")
dim fichero
fichero = tabla.fields("imagen")
dim fs
Set fs=Server.CreateObject("Scripting.FileSystemObject ")
if fs.FileExists(carpeta & fichero) then
fs.DeleteFile(carpeta & fichero)
end if
set fs=nothing
