黑客风云——风云网络
设为首页 加入收藏 我要投稿 网站地图

您现在的位置: 黑客风云 >> 黑客文章 >> 黑客入门 >> 黑软介绍 >> 正文
·没有路由密码权限时的鸽08-23·上网安全 Vista自我防范10-11
·让濒临崩溃的Windows XP10-11·有备无患,快速自制救急10-11
·要你好看!Windows看图工10-11·空间赞助网提供不同类型10-11
·讨论net.exe和net1.exe的10-10·让3389远程桌面传输更通10-10
·巧妙入侵渗透赌博站10-10·Aspx空间扫权限工具10-10
·Windows2003最新提权工具10-10·易淘乐提供100M免费全能10-10
·系统开机密码忘了不着急10-09·中意网络提供免费100M免10-09
·与众不同 Windows XP开始10-08·让桌面图标翻跟斗 在XP上10-08
·上海宽元站长资助计划-提10-08·个性化Windows XP的任务10-07
·趣盘提供3G免费网络硬盘10-07·秀山热线提供200MB免费全10-07
·一次艰辛的提权过程10-06·成功入侵IT大卖场的渗透10-06
·mysqlhack- MYSQL利用工10-06·lanker一句话PHP后门客户10-06
·WIXI提供3G免费多媒体网10-06·新人网络提供100M/ftp免10-06
·如何利用QQ带来高流量10-05·UuShare提供免费网络文件10-05
[推荐]IIS日志清理专题,CMD版,VBS版,JS版,WSH版
        ★★★★

IIS日志清理专题,CMD版,VBS版,JS版,WSH版

文章整理发布:黑客风云 文章来源:www.05112.com 更新时间:2008-8-6 11:31:44

 

实例代码:

IIS日志清理CMD版代码(DelIISLog.cmd):

以下是引用片段:
@echo off
title Made by www.yongfa365.com
::设置当前日期前多少天或后多少天
set/a beforedays=-3
::设置目录所在位置
set   dir="F:\log\"
::当前日期转换为天数并进行计算
call :Date2Day %date:~0,10% days
set/a days=%days%%beforedays%
call :Day2Date %days% lastdate
::计算完毕,生成想要的字符组合
set okstr=ex%lastdate:~2,6%.log
::删除这些文件
del del /f /s /q %dir%\%okstr%

cmd /k 

:Date2Day
setlocal ENABLEEXTENSIONS
for /f "tokens=1-3 delims=/-, " %%a in (’echo/%1’) do (
set yy=%%a & set mm=%%b & set dd=%%c
)
set /a dd=100%dd%%%100,mm=100%mm%%%100
set /a z=14-mm,z/=12,y=yy+4800-z,m=mm+12*z-3,j=153*m+2
set /a j=j/5+dd+y*365+y/4-y/100+y/400-2472633
endlocal&set %2=%j%&goto :EOF 

:Day2Date
setlocal ENABLEEXTENSIONS
set /a i=%1,a=i+2472632,b=4*a+3,b/=146097,c=-b*146097,c/=4,c+=a
set /a d=4*c+3,d/=1461,e=-1461*d,e/=4,e+=c,m=5*e+2,m/=153,dd=153*m+2,dd/=5
set /a dd=-dd+e+1,mm=-m/10,mm*=12,mm+=m+3,yy=b*100+d-4800+m/10
(if %mm% LSS 10 set mm=0%mm%)&(if %dd% LSS 10 set dd=0%dd%)
endlocal&set %2=%yy%%mm%%dd%&goto :EOF

IIS日志清理VBS版代码(DelIISLog.vbs):

以下是引用片段:
’IIS日志清理VBS版代码(DelIISLog.vbs)  Made by www.yongfa365.com
’调用方法:DelIISLog "IIS日志所在路径",保留多少天的IIS日志

’遍历IIS日志文件夹下的所有文件及子文件夹下的文件
Function DelIISLog(IISLogPath,KeepDays)
on error resume next
    Set oFso = CreateObject("Scripting.FileSystemObject")
    Set oFolder = oFso.GetFolder(IISLogPath)
    Set oSubFolders = oFolder.SubFolders  ’得到该目录下所有的文件夹的集合
    Set oFiles = oFolder.Files ’得到该目录下所有的文件的集合
    ’第一步处理当前目录下的所有文件
    For Each oFile In oFiles ’遍历所有文件
        if right(oFile.name,3)="log" then
            oDate=cdate("20" & mid(oFile.name,3,2) & "-" & mid(oFile.name,5,2) & "-" & mid(oFile.name,7,2))
            if date-oDate > KeepDays then oFile.delete ’判断是不是要处理的IIS日志文件,如果是的话直接删除
        end if
    Next
    ’第二步处理当前目录下的所有目录,进行递归调用
    For Each oSubFolder In oSubFolders
        DelIISLog oSubFolder.Path,KeepDays ’递归
    Next

End Function

DelIISLog "D:\IISLogTest",20 ’遍历

IIS日志清理JS版代码(DelIISLog.js):

以下是引用片段:
//IIS日志清理JS版代码(DelIISLog.js)  Made by www.yongfa365.com
//调用方法:DelIISLog("IIS日志所在路径",保留多少天的IIS日志);

//遍历IIS日志文件夹下的所有文件及子文件夹下的文件
function DelIISLog(IISLogPath,KeepDays){
    var fso = new ActiveXObject("Scripting.FileSystemObject");
    var f = fso.GetFolder(IISLogPath);
    var Folders = new Enumerator(f.SubFolders); //得到该目录下所有的文件夹的集合
    var Files = new Enumerator(f.Files); //得到该目录下所有的文件的集合
    //第一步处理当前目录下的所有文件
    for (; !Files.atEnd(); Files.moveNext()) {
        var fileName = Files.item().name;
        var year = "20" + fileName.substr(2, 2);
        var mouth = fileName.substr(4, 2);
        var day = fileName.substr(6, 2);
        var days = Math.round(((new Date()).getTime() - Date.UTC(year, mouth - 1, day)) / 1000 / 60 / 60 / 24);
        if (days > KeepDays) Files.item().Delete(); //判断是不是要处理的IIS日志文件,如果是的话直接删除
    }
    //第二步处理当前目录下的所有目录,进行递归调用
    for (; !Folders.atEnd(); Folders.moveNext()) {
        DelIISLog(Folders.item(),KeepDays);
    }
}
//调用函数,比如:"F:\\log",5  或 "C:\\windows\\system32\\LogFiles",5
DelIISLog("D:\\IISLogTest",2);

 

上一页  [1] [2] [3] 下一页

文章录入:cainiaowang    责任编辑:xinlian 
【字体:
Copyright @2006 黑客风云 ●业务联系:QQ 联系怪人 联系奇人 Email:给怪人发邮件 给奇人发邮件
ICP备案:冀06009886