asp如何删除指定后缀的文件以外的所有文件?

发布网友发布时间：2024-10-23 22:35

共1个回答

热心网友时间：2024-10-31 14:24

NotDel="asp|jpg"
set Fso=createobject("Scripting.filesystemobject")
set M_fso=fso.getfolder(Server.MapPath(Path))
if M_fso.files.count>0 then
for each f in M_fso.files
if instr(NotDel,lcase(mid(f.name,instrRev(f.name,".")+1)))>0 then Fso.DeleteFile(Server.MapPath(Path)&"\"&f.name)
next
end if
Set Fso=Nothing

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。
E-MAIL:11247931@qq.com