Python语言技术文档

微信小程序技术文档

php语言技术文档

jsp语言技术文档

asp语言技术文档

C#/.NET语言技术文档

html5/css技术文档

javascript

点击排行

您现在的位置:首页 > 技术文档 > asp技巧

用实现asp批量删除目录及文件的代码

来源:中文源码网    浏览:378 次    日期:2024-03-29 01:26:42
【下载文档:  用实现asp批量删除目录及文件的代码.txt 】


用实现ASP批量删除目录及文件的代码
函数过程: 复制代码 代码如下:<% 'del.asp dim fso,tmpfolder,tmpsubfolder,tmpfile,tmpfiles set fso=server.CreateObject("Scripting.FileSystemObject") sub delfolder(sPath) If (fso.FolderExists(server.MapPath (sPath))) then set tmpfolder=fso.GetFolder(server.MapPath (sPath)) set tmpfiles=tmpfolder.files for each tmpfile in tmpfiles fso.DeleteFile (tmpfile) next set tmpsubfolder=tmpfolder.SubFolders for each tmpfolder in tmpsubfolder response.Write spath&"/"&tmpfolder.name&"
" delfolder(spath&"/"&tmpfolder.name ) next fso.DeleteFolder (server.MapPath (sPath)) end if end sub %> 调用方法: 复制代码 代码如下:<% '调用例子 'del.asp放到要删除的目录同一层,要删除的目录存在且其下有若干子目录和文件,要对该目录具有修改权限。 delfolder("目录名") %>

相关内容