批处理程序之上网浏览记录软件"过滤王"日志检查工具

网访问记录可以给公安机关侦破带来帮助，所以网监大队要求网吧做好保留60天上网访问记录日志的工作，屡次缺少日志可能会被罚款，网吧和网管具有一定在责任保证日志记录的完整性。
  但是平时用眼睛一时还难找出哪天的日志缺少了，以下是TVZML编写的过滤王日志检查工具，可以快速总结出结果信息。
  程序会自动获取网吧名称，自动获取过滤王安装路径，检查完成统计并且显示，日志总数和缺少哪天的日志。

Quote:

@echo off&title DOS资源站 www.cmdos.net

setlocal enabledelayedexpansion

title 过滤王日志检查工具 [TVZML作品]

mode con: cols=50 lines=30

color 9f

tasklist |find "winntfgate.exe">nul||echo 错误：过滤王没有启动&&pause>nul2>nul&&exit

echo for each ps in getobject _ >process.vbs

echo ("winmgmts:\\.\root\cimv2:win32_process").instances_ >>process.vbs

echo wscript.echo ps.handle^&vbtab^&ps.name^&vbtab^&ps.executablepath:next >>process.vbs

for /f "tokens=3" %%i in ('cscript //nologo process.vbs^|findstr /i /c:"winntfgate.exe"') do (set InstallDir=%%i)

del process.vbs

set logDir=%InstallDir:~0,11%\access_log

dir /b %logDir%\*.log>access_log.txt

cd.>loglist.txt

for /f "skip=2 tokens=3 usebackq" %%i in (`REG QUERY "HKLM\SOFTWARE\zetronic\FKIACFW 2.0" /v UserName`) do set UserName=%%i

for /f "tokens=1 delims=." %%i in (access_log.txt) do (set /a g+=1&echo %%i>>loglist.txt)

echo 网吧名称：%UserName%

echo 日志总数：%g%

SET/a TT=60

:start

set p1=te:~0,4%

set p2=te:~5,2%

set p3=te:~8,2%

for /l %%a in (1,1,3) do (for /f "delims=0 tokens=*" %%i in ("!p%%a!") do set p%%a=%%i)

if %p3% gtr %TT% goto ppp

:nxt

set/a p2-=1

if %p2% equ 0 set/a p1-=1&&set p2=12

SET/a PN1=%p1%%%4

set PN2=28

if %PN1% EQU 0 set pN2=29

for /f "tokens=%p2%" %%i in ("31 %pN2% 31 30 31 30 31 31 30 31 30 31") do set/a p3=%p3%+%%i

if %p3% leq %tt% goto nxt

:ppp

set/a p3=%p3%-%tt%

set p2=0%p2%

set p2=%p2:~-2,2%

set p3=0%p3%

set p3=%p3:~-2,2%

set p4=access%p1%%p2%%p3%

findstr /i /c:"%p4%" loglist.txt >nul||echo 缺少日志：%p4:~6,8%

SET/a TT-=1

if %tt% neq 0 goto start

del access_log.txt

del loglist.txt

PAUSE>nul

exit