www.gusucode.com > 25175 学生成绩管理查询系统码程序 > ADMIN/fsodelbatch.asp
<% ntime=server.urlencode(now()) basepath=trim(request.form("basepath")) if request.form("act")="delbatch" and left(basepath,1)="/" then path=request.querystring("path") page=request.querystring("page") basepath=server.mappath(basepath) set obj_fso=server.createobject("scripting.filesystemobject") set obj_folders=request.form("folders") set obj_files=request.form("files") if obj_folders.count>0 then for each foldername in obj_folders if obj_fso.folderexists(basepath&"\"&foldername) then obj_fso.deletefolder basepath&"\"&foldername,true end if next end if if obj_files.count>0 then for each filename in obj_files if obj_fso.fileexists(basepath&"\"&filename) then obj_fso.deletefile basepath&"\"&filename,true end if next end if set obj_fso=nothing response.redirect "fsoexplorer.asp?path="&path&"&page="&page&"&ntime="&ntime else response.redirect "fsoexplorer.asp?ntime="&ntime end if %>