Borrar un archivo en asp clásico

Código ASP clásico

• Por Programador ASP clásico /
• 16/11/2012 @ 13:59:09  /
• 1009 visitas

Función para borrar un archivo del servidor con ASP clásico. Para borrar el archivo se requiere pasar la ruta (path) completa a la función.

<%

mi_ruta =request.serverVariables("APPL_PHYSICAL_PATH") & "\documentos\foto.jpg"

Function BorrarArchivo(archivo) 

    dim fso 

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

    if fso.FileExists(archivo) then 

        fso.DeleteFile(archivo) 

        BorrarArchivo = true 

		If Err.Number <> 0 Then

			Response.Write "No se pudo borrar el archivo " & mi_ruta & "<br/>"

		    Response.Write "Error número: "  & Err.Number & " Descripción: " & Err.Description & "<br/>"

		Else

			Response.Write "El archivo: " & mi_ruta & " se borró satisfactoriamente<br/>"

		End If

    else 

        BorrarArchivo = false 

		Response.Write "No existe el archivo: " & mi_ruta & "<br/>"

    end if 

    Set fso = Nothing 

	Err.Clear

	On Error GoTo 0

End function



call borrarArchivo(mi_ruta)

%>
 
 

tags: borrar archivo asp clasico, borrar archivo asp classic, asp clasico borrar archivo, asp clasico borrar archivo de texto