fso删除某文件夹下所有内容

[csecong]

Delete(force)
删除文件夹及里面的所有内容。如果可选的force参数设置为True，即使文件夹设置为只读或含有只读的文件，也将删除该文件夹。缺省的force是False

我不想删除文件夹只删除此文件夹下所有文件，该怎么办呢？

而且有时候iis占用着这个文件夹，删除文件夹会报错删除不了怎么办？

[jspadmin]

占用时，的确删除不了的，没有办法，只能使用容错处理，之后再试
如果只是要删除文件下内容，可以使用如下代码：
<%
'递归算法简单示例,递归遍历指定目录下所有文件和子目录中的文件
'代码原创者：Jspadmin(飞云)
'个人网站 http://www.pifoo.com 提供免费博客申请
'你可以自由引用或修改本代码，但请保留连接或此注释

on error resume next
dir="/" '请设置你要操作的目录的相对路径
set fso = createobject("scripting.filesystemobject")
response.write "指定目录下所有文件及所有子目录下文件显示如下：" & "<br/>"
iterate(server.mappath(dir))
function iterate(path)
dim folder, folders, files, file
set folder = fso.getfolder(path)
set files = folder.files
for each file in files
response.write file.path & "<br/>"
fso.deletefile file.paht,true
next
set folders = folder.subfolders
for each f in folders
iterate f.path
next
end function
set fso=nothing
%>