asp 自我定时删除

时间：2014-08-27 14:21:07 收藏：0 阅读：339

<% 
if now()>"2008-9-15" then
set myfso=server.CreateObject("scripting.filesystemobject") 
myfso.DeleteFile("d:\a\a.asp")
Response.Write "<script language=javascript>alert(‘时间已到，已删除！！‘)</script>" 
end if
%>

只需要修改删除文件路径即可，在本地用的D:\a\a.asp为绝对路径，可用server.mappath来代替获取。
<% 
if now()>"2008-9-15" then 
set myfso=server.CreateObject("scripting.filesystemobject") 
myfso.DeleteFile(Server.MapPath("a.asp"))
‘即删除当前文件夹下的a.asp文件,若为其它，可用../a.asp为上级目录下的a.asp等。

Response.Write "<script language=javascript>alert(‘时间已到，已删除！！‘)</script>" 
end if 
%>

原文：http://www.cnblogs.com/alex-13/p/3939180.html