求助，编写一个清空止录里面的所有文件的代码！

主题：求助，编写一个清空止录里面的所有文件的代码！

aaa1231 [专家分：0] 发布于 2007-07-31 22:43:00

我想编写一个点击它就能自动清空服务器里“C:\Inetpub\wwwroot\yn\ex\”所有文件的ＡＳＰ代码，我网上看了很多，都不实用，请大虾们帮帮小弟，小弟感激不尽！

本帖地址： http://bbs.pfan.cn/post/244950.html

回复列表（共7个回复）

沙发

merry05 [专家分：8920] 发布于 2007-07-31 23:16:00

应该可以这样，利用fso对C:\Inetpub\wwwroot\yn\ex\下的文件进行枚举，再逐一delete

没具体实现过~~~~

板凳

aaa1231 [专家分：0] 发布于 2007-08-01 08:24:00

能不能给我一个具的代码，我不会编写啊!

我想了另一种方法，在C:\Inetpub\wwwroot\中放一个BAT的文件，这个文件里面含有自动清除文件的相关命令，使用ASP来调用BAT文件就能清除文件了，不知道这样行不行？这样的代码是怎样编写的？

3 楼

wangsdong [专家分：21390] 发布于 2007-08-01 09:05:00

<%
'创建一个FileSystemObject对象的事例
Set MyFileObject=Server.CreateObject("Scripting.FileSystemObject")
'创建一个Folder对象
Set MyFolder=MyFileObject.GetFolder("c:\MyFolder") 'c:\myfolder改成你想要删除的文件夹
'循环显示其中文件
For Each thing in MyFolder.Files
Response.Write("<p>"&thing) '输出文件路径
MyFileObject.DeleteFile thing '删除这些文件,此删除不可以恢复，需要小心使用
Next
%>

4 楼

aaa1231 [专家分：0] 发布于 2007-08-01 13:40:00

非常感谢，我已经正常使用了代码！
可是还是一个问题，清除文件时，返回信息里面，会显示整个文件的路径(如：C:\Inetpub\wwwroot\xxx\xx.xx)，我只想让它显示已删除的文件名称，不显示路径，代码怎么改写一下？

5 楼

wangsdong [专家分：21390] 发布于 2007-08-01 14:31:00

取最后一个\后面的内容

6 楼

aaa1231 [专家分：0] 发布于 2007-08-01 15:52:00

嗨，我不明白啊，什么取最后一个\后面的内容？？？

7 楼

wangsdong [专家分：21390] 发布于 2007-08-02 12:45:00

C:\Inetpub\wwwroot\xxx\xx.xx
最后一个\后面的内容就是文件名 xx.xx

我来回复

您尚未登录，请登录后再回复。点此登录或注册

主题：求助，编写一个清空止录里面的所有文件的代码！

回复列表（共7个回复）

我来回复

程序员工具箱 new

代码片段

本版新帖

主题：求助，编写一个清空止录里面的所有文件的代码！

回复列表 （共7个回复）

我来回复

程序员工具箱 new

代码片段

本版新帖

回复列表（共7个回复）