ASP删除文件:

<%
Dim FSO '声明一个名称为 objFSO 的变量以存放对象实例
Set FSO = Server.CreateObject("Scripting.FileSystemObject")
If FSO.FileExists(Server.MapPath("\newfile.asp")) Then
    FSO.DeleteFile Server.MapPath("\newfile.asp"),True
    Response.Write "已经成功地对文件"&Server.MapPath("\newfile.asp")&"进行了删除"
Else
    Response.Write Server.MapPath("\newfile.asp")&"不存在,无法进行删除"
End If
Set FSO = Nothing '释放 FileSystemObject 对象实例内存空间
%>

ASP删除目录/文件夹:

<%
Dim FSO '声明一个名称为 objFSO 的变量以存放对象实例
Set FSO = Server.CreateObject("Scripting.FileSystemObject")
If FSO.FileExists(Server.MapPath("\newfile.asp")) Then
    FSO.DeleteFolder Server.MapPath("\newfile.asp"),True
    Response.Write "已经成功地对文件"&Server.MapPath("\newfile.asp")&"进行了删除"
Else
    Response.Write Server.MapPath("\newfile.asp")&"不存在,无法进行删除"
End If
Set FSO = Nothing '释放 FileSystemObject 对象实例内存空间
%>