28,390
社区成员
发帖
与我相关
我的任务
分享
string FF = Server.MapPath(file);
Set objFSO = Server.CreateObject("Scripting.FileSystemObject");
objFSO.DeleteFile(Server.MapPath(file));
sub delfile()
'当前时间,设定时间
dim currentTime,strTime
currentTime=Day(date())
strTime=2 每月2号
if datediff("d",currentTime,strTime)=0 then
set fso=Server.CreateObject("scripting.filesystemobject")
if server.mappath() then
fso.deletefile server.mappath()
end if
end if
end sub