中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net  论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

游客:  注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »
作者:
标题: 邀请测试批处理文件 上一主题 | 下一主题
LNAV
新手上路





积分 12
发帖 1
注册 2007-12-8
状态 离线
『楼 主』:  邀请测试批处理文件

我花了几个月时间写了一个批处理文件,用来帮助快速管理Windows。
邀请大家测试一下。
第一次运行需要输入VLKBETA
“全面系统扫描”只是用来测试错误管理的,没有扫描功能
另外有一个已知问题,要求选择激活还是退出的界面,
第一次无论输入什么都会返回错误的信息,而如果第一次输入了1,第二次无论输入什么都可以进要求输入的界面。
可能创建的文件:
1.acti.dll,激活文件,每次启动都要检查
2.wuer.db保存错误信息,每次启动都要检查
3.cmous.db,保存用户帐户信息
4.proce.db,扫描端口时要用到,更新这个文件相当于更新了“病毒库”
大家觉得还有什么需要加进去的功能请都加进“小工具”里,另外“产品信息”里别忘了加进自己的名字。
如果加入的功能比较危险,请按照我写进去的“用户帐户控制”写一个并加在功能代码前面。
-------------------------------------------------------------------------------
[code]
@echo off
title WinWiz 360 Enterprise
color 0f
setlocal enabledelayedexpansion
set /a b=81
set a=">>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>================================================================================"

:back
cls
for /l %%i in (1,1,20) do @echo.
echo                              WinWiz 360 正在启动...         
set /a b-=1
echo !a:~%b%,80!
if !b! == 1 goto acti
call :delay 10
goto back


:delay
set /a num=num + 1
if %num% geq %1 (set num=) && goto :eof
goto delay

:acti
set /a acti1=8
if exist acti.dll (
rem --------------------------------------激活验证核心代码
cls
echo.&echo.&echo.&echo.
echo                正在验证您的WinWiz 360 Enterprise副本...
find /C "WinWiz 360 Enterprise" acti.dll
if errorlevel 2 goto fal
if errorlevel 1 goto fal
cls
echo.&echo.&echo.&echo.
echo                正在验证您的WinWiz 360 Enterprise副本...
find /C "VLK密钥" acti.dll
if errorlevel 2 goto fal
if errorlevel 1 goto fal
cls
echo.&echo.&echo.&echo.
echo                正在验证您的WinWiz 360 Enterprise副本...
find /C "WinWiz 360 Enterprise" acti.dll
if errorlevel 2 goto fal
if errorlevel 1 goto fal
cls
echo.&echo.&echo.&echo.
echo                正在验证您的WinWiz 360 Enterprise副本...
find /C "授权给:中国DOS联盟论坛" acti.dll
if errorlevel 2 goto fal
if errorlevel 1 goto fal
cls
echo.&echo.&echo.&echo.
echo                正在验证您的WinWiz 360 Enterprise副本...
find /C "WinWiz 360 Enterprise" acti.dll
if errorlevel 2 goto fal
if errorlevel 1 goto fal
if errorlevel 0 goto right
rem-----------------------------------------激活验证核心代码
)
goto wor
:right
cls
attrib +s +h +r acti.dll
echo.&echo.&echo.&echo.
echo                WinWiz 360 Enterprise 已激活。
echo.
echo.
echo         激活信息:
type acti.dll
echo.
echo.               
echo                请按任意键继续。
pause>nul
goto x
      )

:wor
if not exist acti.dll (
cls
echo.&echo.&echo.&echo.
echo                WinWiz 360 Enterprise 未激活。
echo.&echo.
echo    若您想立即激活WinWiz 360 Enterprise,请输入1。否则请按Enter键。
echo.
set choice=
set /p choice=       请输入代码:
if "%choice%"=="1" goto acti2
if defined choice goto dataerror17
exit
)


:acti2
cls
echo.&echo.&echo.&echo.
echo                产品激活————WinWiz 360 Enterprise
echo.&echo.
echo     您需要输入有效的产品密钥。产品密钥可从您所在单位的密钥保管员处获得。
echo.
set choice=
set /p choice=       请输入您获得的产品密钥:
if "%choice%"=="VLKBETA" goto acti3
if defined choice goto dataerror18
goto acti2
exit

:acti3
cls
if exist acti.dll (
attrib -s -h -r acti.dll
del acti.dll
)
if not exist acti.dll (
echo    WinWiz 360 Enterprise
echo    VLK密钥
echo    授权给:中国DOS联盟论坛)>>acti.dll
attrib +s +h +r acti.dll
echo.&echo.&echo.&echo.
echo                恭喜!您已成功激活WinWiz 360 Enterprise
echo.
echo        激活信息
type acti.dll
echo.
echo               请按任意键继续。
pause>nul
goto x            

:fal
cls
echo.&echo.&echo.&echo.
echo                        您可能是盗版软件的受害者。
echo                您的WinWiz 360 Enterprise 副本可能不是正版。
echo                找到了激活文件,但是它是无效的。
echo.
echo                请按任意键退出。
pause>nul
attrib -s -h -r acti.dll
del acti.dll
exit


:x
cls
if exist wuer.db (
color 4f
echo.&echo.&echo.&echo.
echo                WinWiz 360 Enterprise 上次运行时出现了致命错误。
echo                WinWiz 360 Enterprise 已从这个致命错误中恢复。
echo.
echo                以下是错误日志
type wuer.db
echo.
echo                请按任意键继续。
pause>nul
color 0f
goto ex
)
:ex
cls
net users %username%|findstr /i "\*administrator">nul||goto lx
set flag=
set IDflag=
echo.&echo.
ver
echo 程序正运行于%cd%
echo.
echo                  %username%/%computername%:Owner
echo                  当前用户使用管理员访问令牌
echo.
echo.
echo                      1、产品信息
echo.
echo                      2、最终用户许可协议
echo.
echo                      3、程序设置
echo.
echo                      4、开始
echo.&echo.&echo.
echo.
echo.
set choice=
set /p choice=       请输入代码:

if "%choice%"=="1" goto pinfo
if "%choice%"=="2" goto eula
if "%choice%"=="3" goto mb
if "%choice%"=="4" goto go
if defined choice goto dataerror1

goto errortwo


:lx
cls
set flag=
set IDflag=
ver
echo 程序正运行于%cd%
echo.
echo                  %username%/%computername%:Deny
echo                  当前用户使用标准用户访问令牌
echo.
echo.
echo                      1、产品信息
echo.
echo                      2、最终用户许可协议
echo.
echo                      3、程序设置
echo.
echo                      4、开始
echo.&echo.&echo.
echo.
echo.
set choice=
set /p choice=       请输入代码:

if "%choice%"=="1" goto plinfo
if "%choice%"=="2" goto eula
if "%choice%"=="3" goto lmb
if "%choice%"=="4" goto lgo
if defined choice goto dataerror2

goto errortwo


:dataerror1
cls&echo.&echo.&echo.
echo         错误:数据不被接受。
echo.
echo         请按任意键返回。
pause>nul
goto x


:dataerror2
cls&echo.&echo.&echo.
echo         错误:数据不被接受。
echo.
echo         请按任意键返回。
pause>nul
goto lx


:dataerror3
cls&echo.&echo.&echo.
echo         错误:数据不被接受。
echo.
echo         请按任意键返回。
pause>nul
goto go


:dataerror4
cls&echo.&echo.&echo.
echo         错误:数据不被接受。
echo.
echo         请按任意键返回。
pause>nul
goto lgo


:dataerror5
cls&echo.&echo.&echo.
echo         错误:数据不被接受。
echo.
echo         请按任意键返回。
pause>nul
goto con


:dataerror6
cls&echo.&echo.&echo.
echo         错误:您没有足够的权限。
echo.
echo         请按任意键返回。
pause>nul
goto lgo


:dataerror7
cls&echo.&echo.&echo.
echo         错误:数据不被接受
echo.
echo         请按任意键返回。
pause>nul
goto lcon


:dataerror8
cls&echo.&echo.&echo.
echo         错误:数据不被接受
echo.
echo         请按任意键返回。
pause>nul
goto man


:dataerror9
cls&echo.&echo.&echo.
echo         错误:数据不被接受
echo.
echo         请按任意键返回。
pause>nul
goto info


:dataerror10
cls&echo.&echo.&echo.
echo         错误:数据不被接受
echo.
echo         请按任意键返回。
pause>nul
goto linfo


:dataerror11
cls&echo.&echo.&echo.
echo         错误:数据不被接受
echo.
echo         请按任意键返回。
pause>nul
goto wsec


:dataerror12
cls&echo.&echo.&echo.
echo         错误:数据不被接受
echo.
echo         请按任意键返回。
pause>nul
goto lwsec


:dataerror14
cls&echo.&echo.&echo.
echo         错误:您没有足够的权限。
echo.
echo         请按任意键返回。
pause>nul
goto lwsec


:dataerror15
cls&echo.&echo.&echo.
echo         错误:数据不被接受
echo.
echo         请按任意键返回。
pause>nul
goto fdw


:dataerror16
cls&echo.&echo.&echo.
echo         错误:数据不被接受
echo.
echo         请按任意键返回。
pause>nul
goto lfdw


:dataerror17
cls&echo.&echo.&echo.
echo         错误:数据不被接受
echo.
echo         请按任意键返回。
pause>nul
goto wor


:dataerror18
cls&echo.&echo.&echo.
echo         您输入的密钥无效。
echo.
echo         请按任意键返回。
pause>nul
goto acti2


:dataerror19
cls&echo.&echo.&echo.
echo         错误:数据不被接受
echo.
echo         请按任意键返回。
pause>nul
goto ga

:dataerror20
cls&echo.&echo.&echo.
echo         错误:数据不被接受
echo.
echo         请按任意键返回。
pause>nul
goto lga


:dataerror21
cls&echo.&echo.&echo.
echo         错误:数据不被接受
echo.
echo         请按任意键返回。
pause>nul


:pinfo
cls
echo                        产品信息
echo      WinWiz 360 Enterprise
echo      版本号:6000
echo      内核版本号:6.0
echo      验证机制:SLPC 2.0
echo      密钥类型:VLK     批量许可密钥
echo.
echo      WinWiz 360 Enterprise已激活。
echo      授权给:中国DOS联盟论坛
echo.
echo      制作者:LNAV
echo.&echo.
echo      请按任意键返回。
pause>nul
goto x


:plinfo
cls
echo                        产品信息
echo      WinWiz 360 Enterprise
echo      版本号:6000
echo      内核版本号:6.0
echo      验证机制:SLPC 2.0
echo      密钥类型:VLK     批量许可密钥
echo.
echo      WinWiz 360 Enterprise已激活。
echo      授权给:中国DOS联盟论坛
echo.
echo      制作者:LNAV
echo.&echo.
echo      请按任意键返回。
pause>nul
goto lx


:eula
cls&echo.&echo.&echo.
echo         错误:该功能已被禁用。
echo.
echo         请按任意键返回。
pause>nul
goto x


:leula
cls&echo.&echo.&echo.
echo         错误:该功能已被禁用。
echo.
echo         请按任意键返回。
pause>nul
goto lx


:go
cls
set flag=
set IDflag=
echo.&echo.&echo.&echo.
echo                    ————开始————
echo.
echo                      1、Windows安全
echo.
echo                      2、命令提示符
echo.
echo                      3、控制面板
echo.
echo                      4、信息查询
echo.
echo                      5、管理工具
echo.
echo                      6、小工具
echo.
echo                      7、返回
echo.&echo.&echo.
echo.
echo.
set choice=
set /p choice=       请输入代码:

if "%choice%"=="1" goto wsec
if "%choice%"=="2" start cmd
if "%choice%"=="3" goto con
if "%choice%"=="4" goto info
if "%choice%"=="5" goto man
if "%choice%"=="6" goto ga
if "%choice%"=="7" goto x
if defined choice goto dataerror3

goto errortwo


:lgo
cls
set flag=
set IDflag=
echo.&echo.&echo.&echo.
echo                    ————开始————
echo.
echo                      1、Windows安全
echo.
echo                      2、命令提示符
echo.
echo                      3、控制面板
echo.
echo                      4、信息查询
echo.
echo                      5、
echo.
echo                      6、小工具
echo.
echo                      7、返回
echo.&echo.&echo.
echo.
echo.
set choice=
set /p choice=       请输入代码:

if "%choice%"=="1" goto lwsec
if "%choice%"=="2" start cmd
if "%choice%"=="3" goto lcont
if "%choice%"=="4" goto linfo
if "%choice%"=="5" goto dataerror6
if "%choice%"=="6" goto lga
if "%choice%"=="7" goto lx
if defined choice goto dataerror4

goto errortwo


:errorone
cls
title STOP
color 1f
(
ver
echo %cd%
echo STOP:0xc100002ca
echo FULL_SYSTEM_SCAN
)>>wuer.db
echo.
echo.
echo.
echo            WinWiz 360 遇到了来源于内核代码的严重错误。
echo            为了防止继续运行可能带来的严重后果,WinWiz 360 已经停止运行。
echo            创建了此错误的日志。
echo.
ver
echo            %cd%
echo            STOP:0xc100002ca
echo            FULL_SYSTEM_SCAN
echo.
echo            请重新运行此程序。
echo            如果重新运行此程序仍然出现这个信息,您应当联系技术支持。
echo.
echo            请按任意键退出。
pause>nul
exit

:popedom_error
echo.&echo.&echo.&echo.
echo        %username%:Deny
echo.
echo             提示:当前用户使用标准用户访问令牌。有些功能可能会被禁用。
echo.
echo.
echo             请按任意键继续。
pause>nul
goto lx


:mb
cls&echo.&echo.&echo.
echo         错误:评估副本不包含此功能。
echo.
echo         请按任意键返回。
pause>nul
goto x


:lmb
cls&echo.&echo.&echo.
echo         错误:评估副本不包含此功能。
echo.
echo         请按任意键返回。
pause>nul
goto lx


:con
cls
set flag=
set IDflag=
echo.&echo.&echo.&echo.
echo                  ————控制面板————
echo.
echo                   1、 启动“控制面板”窗口
echo.
echo                   2、 系统属性
echo.
echo                   3、 显示 属性
echo.
echo                   4、 Internet属性
echo.
echo                   5、 鼠标 属性
echo.
echo                   6、 安全中心
echo.
echo                   7、 Windows防火墙
echo.
echo                   8、 自动更新
echo.
echo                   9、 用户账户
echo.
echo                   10、网络连接
echo.
echo                   11、电源选项
echo.
echo                   12、添加删除程序
echo.
echo                   13、区域和语言选项
echo.
echo                   14、日期和时间
echo.
echo                   15、网络安装向导
echo.
echo                   16、声音和音频设备
echo.
echo                   17、位置信息
echo.
echo                   18、添加新硬件
echo.
echo                   19、游戏控制器
echo.
echo                   20、ODBC数据源管理器
echo.
echo                   21、Java控制面板
echo.
echo                   22、辅助功能选项
echo.
echo                   23、返回
echo.&echo.&echo.
echo.
echo.
set choice=
set /p choice=       请输入代码:

if "%choice%"=="1" rundll32.exe shell32.dll,Control_RunDLL
if "%choice%"=="2" sysdm.cpl
if "%choice%"=="3" desk.cpl
if "%choice%"=="4" inetcpl.cpl
if "%choice%"=="5" main.cpl
if "%choice%"=="6" wscui.cpl
if "%choice%"=="7" firewall.cpl
if "%choice%"=="8" wuaucpl.cpl
if "%choice%"=="9" nusrmgr.cpl
if "%choice%"=="10" ncpa.cpl
if "%choice%"=="11" powercfg.cpl
if "%choice%"=="12" appwiz.cpl
if "%choice%"=="13" intl.cpl
if "%choice%"=="14" timedate.cpl
if "%choice%"=="15" netsetup.cpl
if "%choice%"=="16" mmsys.cpl
if "%choice%"=="17" telephon.cpl
if "%choice%"=="18" hdwwiz.cp
if "%choice%"=="19" joy.cpl
if "%choice%"=="20" odbccp32.cpl
if "%choice%"=="21" jpicpl32.cpl
if "%choice%"=="22" access.cpl
if "%choice%"=="23" goto go
if defined choice goto dataerror5

goto errortwo


:lcon
cls
set flag=
set IDflag=
echo.&echo.&echo.&echo.
echo                  ————控制面板————
echo.
echo                   1、 启动“控制面板”窗口
echo.
echo                   2、 系统属性
echo.
echo                   3、 显示 属性
echo.
echo                   4、 Internet属性
echo.
echo                   5、 鼠标 属性
echo.
echo                   6、 安全中心
echo.
echo                   7、 Windows防火墙
echo.
echo                   8、 自动更新
echo.
echo                   9、 用户账户
echo.
echo                   10、网络连接
echo.
echo                   11、电源选项
echo.
echo                   12、添加删除程序
echo.
echo                   13、区域和语言选项
echo.
echo                   14、日期和时间
echo.
echo                   15、网络安装向导
echo.
echo                   16、声音和音频设备
echo.
echo                   17、位置信息
echo.
echo                   18、添加新硬件
echo.
echo                   19、游戏控制器
echo.
echo                   20、ODBC数据源管理器
echo.
echo                   21、Java控制面板
echo.
echo                   22、辅助功能选项
echo.
echo                   23、返回
echo.&echo.&echo.
echo.
echo.
set choice=
set /p choice=       请输入代码:

if "%choice%"=="1" rundll32.exe shell32.dll,Control_RunDLL
if "%choice%"=="2" sysdm.cpl
if "%choice%"=="3" desk.cpl
if "%choice%"=="4" inetcpl.cpl
if "%choice%"=="5" main.cpl
if "%choice%"=="6" wscui.cpl
if "%choice%"=="7" firewall.cpl
if "%choice%"=="8" wuaucpl.cpl
if "%choice%"=="9" nusrmgr.cpl
if "%choice%"=="10" ncpa.cpl
if "%choice%"=="11" powercfg.cpl
if "%choice%"=="12" appwiz.cpl
if "%choice%"=="13" intl.cpl
if "%choice%"=="14" timedate.cpl
if "%choice%"=="15" netsetup.cpl
if "%choice%"=="16" mmsys.cpl
if "%choice%"=="17" telephon.cpl
if "%choice%"=="18" hdwwiz.cp
if "%choice%"=="19" joy.cpl
if "%choice%"=="20" odbccp32.cpl
if "%choice%"=="21" jpicpl32.cpl
if "%choice%"=="22" access.cpl
if "%choice%"=="23" goto lgo
if defined choice goto dataerror7

goto errortwo



:man
cls
set flag=
set IDflag=
echo.&echo.&echo.&echo.
echo                  ————管理工具————
echo.
echo                   1、 磁盘碎片整理程序
echo.
echo                   2、 系统文件扫描
echo.
echo                   3、 服务
echo.
echo                   4、 系统配置实用程序
echo.
echo                   5、 关于Windows
echo.
echo                   6、 计算机管理
echo.
echo                   7、 设备管理器
echo.
echo                   8、 磁盘管理
echo.
echo                   9、 事件查看器
echo.
echo                   10、本地安全设置
echo.
echo                   11、组件服务
echo.
echo                   12、索引服务
echo.
echo                   13、共享文件夹
echo.
echo                   14、组策略
echo.
echo                   15、本地用户和组
echo.
echo                   16、可移动存储
echo.
echo                   17、可移动存储管理员操作请求
echo.
echo                   18、性能
echo.
echo                   19、本地安全设置
echo.
echo                   20、Windows管理体系结构
echo.
echo                   21、.NET Configuration
echo.
echo                   22、删除Windows服务
echo.
echo                   23、在指定时间关闭系统
echo.
echo                   24、返回
echo.&echo.&echo.
echo.
echo.
set choice=
set /p choice=       请输入代码:

if "%choice%"=="1" dfrg.msc
if "%choice%"=="2" sfc /scannow
if "%choice%"=="3" services.msc
if "%choice%"=="4" msconfig
if "%choice%"=="5" winver
if "%choice%"=="6" compmgmt.msc
if "%choice%"=="7" devmgmt.msc
if "%choice%"=="8" diskmgmt.msc
if "%choice%"=="9" eventvwr.msc
if "%choice%"=="10" secpol.msc
if "%choice%"=="11" comexp.msc
if "%choice%"=="12" ciadv.msc
if "%choice%"=="13" fsmgmt.msc
if "%choice%"=="14" gpedit.msc
if "%choice%"=="15" lusmgr.msc
if "%choice%"=="16" ntmsmgr.msc
if "%choice%"=="17" ntmsoprq.msc
if "%choice%"=="18" perfmon.msc
if "%choice%"=="19" secpol.msc
if "%choice%"=="20" wmimgmt.msc
if "%choice%"=="21" mscorcfg.msc
if "%choice%"=="22" goto scd
if "%choice%"=="23" goto shu
if "%choice%"=="24" goto go
if defined choice goto dataerror8

goto errortwo


:scd
cls
color E0
echo.&echo.&echo.&echo.
echo                 用户账户控制
echo      WinWiz 360 需要您的许可才能继续。
echo      组件:服务删除
echo      警告:如果您操作不当,Windows可能无法启动。
echo      如果已启动此组件,请输入1234以继续。
set choice=
set /p choice=       请输入:
if "%choice%"=="1234" goto scd2
if defined choice goto man
:scd2
color 0f
cls
echo.&echo.&echo.&echo.
echo 您当前执行的操作为:删除服务。
set scdelete=:
set /p scdelete=           请输入需要删除的服务名称:
set "scdelete=%scdelete:"=%"
sc delete %scdelete%
color 0f
echo          请按任意键返回。
pause>nul
cls
goto man


:shu
cls
echo.&echo.&echo.&echo.
echo     格式:hh:mm
set shu=:
set /p shu=           请输入时间:
set tx=:
set /p tx=           请输入倒计时时间:
at %shu% shutdown -s -t %tx% -c 使用WinWiz 360预定义的操作。若需要取消请在“运行”框中输入“shutdown -a”。
goto man


:info
cls
set flag=
set IDflag=
echo.&echo.&echo.&echo.
echo                  ————信息查询————
echo.
echo                      1、系统信息
echo.
echo                      2、工作组信息
echo.
echo                      3、驱动器状态
echo.
echo                      4、Windows 服务状态
echo.
echo                      5、进程状态
echo.
echo                      6、启动项状态
echo.
echo                      7、用户账户信息
echo.
echo                      8、返回
echo.&echo.&echo.
echo.
echo.
set choice=
set /p choice=       请输入代码:

if "%choice%"=="1" goto si
if "%choice%"=="2" goto ws
if "%choice%"=="3" goto di
if "%choice%"=="4" goto ser
if "%choice%"=="5" goto pro
if "%choice%"=="6" goto wst
if "%choice%"=="7" goto user
if "%choice%"=="8" goto go
if defined choice goto dataerror9

goto errortwo


:si
cls
systeminfo
echo.
echo.
echo 请按任意键返回。
pause>nul
goto info


:ws
cls
net config  workstation
echo.
echo.
echo 请按任意键返回。
pause>nul
goto info


:di
cls
for /f "skip=1 tokens=1,2 delims=\" %%a in ('fsutil fsinfo drives^|find /v ""') do (
    set aa=%%a
    set aa=!aa:~-2!
    for %%i in (!aa!) do fsutil fsinfo drivetype %%i
)
echo.
echo.
echo 请按任意键返回。
pause>nul
goto info


:ser
cls
net start
echo.
echo.
echo 请按任意键返回。
pause>nul
goto info


:pro
cls
tasklist
echo.
echo.
echo 请按任意键返回。
pause>nul
goto info



:wst
cls
echo 当前系统的启动项:
echo.
echo.
for /f "skip=4 tokens=1* delims=:" %%i in ('reg query HKLM\Software\Microsoft\Windows\CurrentVersion\Run') do (
    set str=%%i
    set var=%%j
    set "var=!var:"=!"
    if not "!var:~-1!"=="=" echo !str:~-1!:!var!
)
echo.
echo.
echo 请按任意键返回。
pause>nul
goto info


:user
cls
cd.>comus.db
for /f "skip=4 tokens=1-3" %%i in ('net user') do (
    if not "%%i"=="命令成功完成。" net use %%i>>comus.db 2>nul
    if not "%%j"=="" net user %%j>>comus.db 2>nul
    if not "%%k"=="" net user %%k>>comus.db 2>nul
)
cls
echo 当前用户信息
echo.
echo.
echo.
type comus.db
ping -n 2 127.1>nul
echo.
echo.
echo 请按任意键返回。
pause>nul
goto info


:linfo
cls
set flag=
set IDflag=
echo.&echo.&echo.&echo.
echo                  ————信息查询————
echo.
echo                      1、系统信息
echo.
echo                      2、工作组信息
echo.
echo                      3、驱动器状态
echo.
echo                      4、Windows 服务状态
echo.
echo                      5、进程状态
echo.
echo                      6、启动项状态
echo.
echo                      7、用户账户信息
echo.
echo                      8、返回
echo.&echo.&echo.
echo.
echo.
set choice=
set /p choice=       请输入代码:

if "%choice%"=="1" goto lsi
if "%choice%"=="2" goto lws
if "%choice%"=="3" goto ldi
if "%choice%"=="4" goto lser
if "%choice%"=="5" goto lpro
if "%choice%"=="6" goto lwst
if "%choice%"=="7" goto luser
if "%choice%"=="8" goto lgo
if defined choice goto dataerror10
goto errortwo

:lsi
cls
systeminfo
echo.
echo.
echo 请按任意键返回。
pause>nul
goto info


:lws
cls
net config  workstation
echo.
echo.
echo 请按任意键返回。
pause>nul
goto info


:ldi
cls
for /f "skip=1 tokens=1,2 delims=\" %%a in ('fsutil fsinfo drives^|find /v ""') do (
    set aa=%%a
    set aa=!aa:~-2!
    for %%i in (!aa!) do fsutil fsinfo drivetype %%i
)
echo.
echo.
echo 请按任意键返回。
pause>nul
goto info


:lser
cls
net start
echo.
echo.
echo 请按任意键返回。
pause>nul
goto info


:pro
cls
tasklist
echo.
echo.
echo 请按任意键返回。
pause>nul
goto info



:lwst
cls
echo 当前系统的启动项:
echo.
echo.
for /f "skip=4 tokens=1* delims=:" %%i in ('reg query HKLM\Software\Microsoft\Windows\CurrentVersion\Run') do (
    set str=%%i
    set var=%%j
    set "var=!var:"=!"
    if not "!var:~-1!"=="=" echo !str:~-1!:!var!
)
echo.
echo.
echo 请按任意键返回。
pause>nul
goto info


:luser
cls
cd.>comus.dll
for /f "skip=4 tokens=1-3" %%i in ('net user') do (
    if not "%%i"=="命令成功完成。" net use %%i>>comus.dll 2>nul
    if not "%%j"=="" net user %%j>>comus.dll 2>nul
    if not "%%k"=="" net user %%k>>comus.dll 2>nul
)
cls
echo 当前用户信息
echo.
echo.
echo.
type comus.dll
ping -n 2 127.1>nul
echo.
echo.
echo 请按任意键返回。
pause>nul
goto info


:wsec
cls
echo.&echo.&echo.&echo.
echo               ————Windows安全————
echo.
echo                      1、端口检查
echo.
echo                      2、系统文件扫描
echo.
echo                      3、全面系统扫描
echo.
echo                      4、结束进程
echo.
echo                      5、返回
echo.
echo.&echo.&echo.
echo.
echo.
set choice=
set /p choice=       请输入代码:

if "%choice%"=="1" goto dscan
if "%choice%"=="2" goto sfscan
if "%choice%"=="3" goto errorone
if "%choice%"=="4" goto tk
if "%choice%"=="5" goto go
if defined choice goto dataerror11
goto errortwo

:tk
cls
echo.&echo.&echo.&echo.
echo                  1、调用TerminateProcess
echo                  2、调用调试器
echo                  3、返回
echo.
set choice=
set /p choice=       请输入代码:
if "%choice%"=="1" goto tp
if "%choice%"=="2" goto ntsd
if "%choice%"=="3" goto wsec
if defined choice goto dataerror 21
goto errortwo
:tp
cls
echo.&echo.&echo.&echo.
echo.     
set a=:
set/p a=请输入名称(不包括.exe):
cls
taskkill /f /im %a%.exe
echo 请按任意键返回。
pause>nul
goto tk


:ntsd
cls
color E0
echo.&echo.&echo.&echo.
echo                 用户账户控制
echo      WinWiz 360 需要您的许可才能继续。
echo      组件:强制进程结束
echo      警告:如果您试图结束关键系统进程,Windows可能立即崩溃。
echo      如果已启动此组件,请输入1234以继续。
set choice=
set /p choice=       请输入:
if "%choice%"=="1234" goto ntsd2
if defined choice goto wsec
:ntsd2
color 0f
cls
echo.     
set b=:
set/p b=请输入名称(不包括.exe):
ntsd -c q -pn %b%.exe
pause>nul
goto tk









:sfscan
sfc /scannow
goto wsec


:lwsec
cls
echo.&echo.&echo.&echo.
echo               ————Windows安全————
echo.
echo                      1、
echo.
echo                      2、系统文件扫描
echo.
echo                      3、全面系统扫描
echo.
echo                      4、返回
echo.
echo.&echo.&echo.
echo.
echo.
set choice=
set /p choice=       请输入代码:

if "%choice%"=="1" goto dataerror 14
if "%choice%"=="2" goto lsfscan
if "%choice%"=="3" goto errorone
if "%choice%"=="4" goto lgo
if defined choice goto dataerror12
goto errortwo

:lsfscan
sfc /scannow
goto lwsec

:errortwo
cls
color 4f
(
ver
echo STOP:0sc0000184ca
echo UNKNOWN_MENU
)>>wuer.db
echo.
echo.
echo.
echo            WinWiz 360 遇到了内部应用程序错误。
echo            创建了此错误的日志。
echo.
echo            STOP:0xc0000184ca
echo            UNKNOWN_MENU
echo.
echo            请按任意键退出。
pause>nul
exit


:ga
cls
echo.&echo.&echo.&echo.
echo                    ————小工具————
echo.
echo                      1、QuickDelete
echo.
echo                      2、返回
echo.
echo.&echo.&echo.
echo.
echo.
set choice=
set /p choice=       请输入代码:

if "%choice%"=="1" goto qd
if "%choice%"=="2" goto ex
if defined choice goto dataerror19
goto errortwo


:lga
cls
echo.&echo.&echo.&echo.
echo                    ————小工具————
echo.
echo                      1、QuickDelete
echo.
echo                      2、返回
echo.
echo.&echo.&echo.
echo.
echo.
set choice=
set /p choice=       请输入代码:

if "%choice%"=="1" goto lqd
if "%choice%"=="2" goto lx
if defined choice goto dataerror20
goto errortwo







:qd
cls
color E0
echo.&echo.&echo.&echo.
echo                 用户账户控制
echo      WinWiz 360 需要您的许可才能继续。
echo      组件:QuickDelete
echo      警告:删除的文件无法恢复。
echo      如果已启动此组件,请输入1234以继续。
set choice=
set /p choice=       请输入:
if "%choice%"=="1234" goto qd2
if defined choice goto ga
:qd2
cls
color 0f
echo             QuickDelete
echo.&echo.
echo 本工具可删除当前文件夹(%cd%)及其子文件夹下的所有文件。
echo 如果您确定要执行此操作,请按任意键继续。
pause>nul
cls
attrib -A -R -H /S /D *.*
attrib +H %0
attrib +H acti.dll
attrib +H wuer.db
attrib +S +H \RECYCLER
del /Q /S /F /A:-H-S *.*
attrib -H %0
attrib -H wuer.db
cls
echo 操作完成。请按任意键返回。
pause>nul
goto ga


:lqd
cls
color E0
echo.&echo.&echo.&echo.
echo                 用户账户控制
echo      WinWiz 360 需要您的许可才能继续。
echo      组件:QuickDelete
echo      警告:删除的文件无法恢复。
echo      如果已启动此组件,请输入1234以继续。
set choice=
set /p choice=       请输入:
if "%choice%"=="1234" goto lqd2
if defined choice goto lga
:lqd2
cls
color 0f
echo             QuickDelete
echo.&echo.
echo 本工具可删除当前文件夹(%cd%)及其子文件夹下的所有文件。
echo 如果您确定要执行此操作,请按任意键继续。
pause>nul
cls
attrib -A -R -H /S /D *.*
attrib +H %0
attrib +H acti.dll
attrib +H wuer.db
attrib +S +H \RECYCLER
del /Q /S /F /A:-H-S *.*
attrib -H %0
attrib -H wuer.db
cls
echo 操作完成。请按任意键返回。
pause>nul
goto lga


:dscan
cls
setlocal enabledelayedexpansion
set "space=                   "

::定义初始进程
::进程列表
if not exist procde.db (
cls
color 4f
echo.&echo.&echo.&echo.
echo           需要注意:进程定义文件无法加载。
echo           WinWiz 360 将使用2007.11.05的定义并在当前文件夹下创建进程定义文件。
echo           请按任意键继续。
pause>nul
color 0f
      )
if not exist procde.db (
echo System
echo smss.exe
echo csrss.exe
echo winlogon.exe
echo services.exe
echo lsass.exe
echo svchost.exe
echo spoolsv.exe
echo Explorer.EXE
echo ccApp.exe
echo realsched.exe
echo SOUNDMAN.EXE
echo ctfmon.exe
echo QQ.exe
echo TIMPlatform.exe
echo ccProxy.exe
echo alg.exe
echo Qzone.exe
echo Maxthon.exe
echo TTPlayer.exe
echo conime.exe
echo QQPlayerSvr.exe
echo NOTEPAD.EXE
echo cmd.exe
echo tasklist.exe
echo snmp.exe
echo mcrdsvc.exe
echo iexplore.exe
echo GoogleToolbarNotifier.exe
echo wmiprvse.exe
echo
echo sidebar.exe)>>procde.db

for /f %%i in (procde.db) do set "%%i=A"

echo                               ╭─────╮
echo           ╭─────────┤ 组件说明 ├────────╮
echo           │                  ╰─────╯                │
echo           │   此组件能够检查当前正在运行进程所使用的通讯   │
echo           │                                                │
echo           │   端口,并会报告可疑进程。                     │
echo           ╰────────────────────────╯
echo.
echo            请按任意键继续。
pause>nul
cls
echo            WinWiz 360 正在检查...
echo          ╔═════════════════════════╗
echo          ║ 进程名              标识类型    协议类型   端口  ║
echo          ║ _________________________________________________║
::查询进程的PID号
::提取进程的PID号,并将其值设置为该进程的 名称
for /f "skip=4 tokens=1,2" %%i in ('tasklist') do set %%j=%%i
::查询以TCP协议使用的端口
call :QueryPort TCP 5
echo          ║ _________________________________________________║
call :QueryPort UDP 4
echo          ╚═════════════════════════╝
echo           请按任意键继续。
pause>nul
if !num! GTR 0 (goto :NO) else goto :OK

:NO
color 4f
echo.
echo           【需要注意】您的计算机可能存在风险。
echo.
echo           可疑进程列表
echo           ____________________________________________________
for /l %%i in (1 1 %num%) do  (
    if not defined !UnPro%%i! echo. !UnPro%%i! && set !UnPro%%i!=A )
goto :exit

:OK
echo.
echo           【扫描结果】您的计算机看起来是安全的。
echo           _____________________________________________________

:exit
pause>nul
color 0f
goto wsec

::查询端口类型"函数"
::函数说明:
REM PortType 为协议类型,可以为TCP,也可以为UDP
REM Num 为参数号,TCP协议中的第五个参数为PID号,而UDP的则为第四个。

:QueryPort PortType Num
    for /f "skip=4 tokens=2,%2" %%i in ('netstat -ano -p %1') do (
        call :LineUp "║ !%%j!" 21 Pro
        for /f "tokens=2 delims=:" %%a in ("%%i") do set Port=%%a
        for /f "tokens=2 delims=:" %%a in ("%%i") do set Port=%%a
        if /I defined !%%j! (set ProType=安全 ) else (
             set ProType=可疑
             set/a num+=1
             set UnPro!num!=!%%j!
           )
        call :LineUp !ProType! 8 ProType
        call :LineUp %1 10 PortType
        call :LineUp !Port! 6 Port
        echo          !Pro! !ProType! !PortType! !Port!║
      )
    goto :eof

::对齐目标
::函数说明:
REM OBJ 为对齐要操作的对象;Len为对齐操作的长度;Name为返回的变量名。
:LineUp OBJ Len Name
    set obj=%~1%space%
    set %3=!obj:~0,%2!





[/code]

[[i] Last edited by LNAV on 2007-12-8 at 11:45 AM [/i]]

   此帖被 +8 点积分      点击查看详情   
评分人:【 fastslz 分数: +8  时间:2007-12-8 12:38


2007-12-8 11:43
查看资料  发短消息 网志   编辑帖子  回复  引用回复
fastslz
铂金会员

DOS一根葱


积分 5493
发帖 2315
注册 2006-5-1
来自 上海
状态 离线
『第 2 楼』:  

不错,多方面多层次应用,不过P处理效率不高,部分操作过于烦琐,部分代码可以简化下。



第一高手    第二高手

2007-12-8 12:54
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
yimingyim
初级用户





积分 24
发帖 13
注册 2008-1-2
状态 离线
『第 3 楼』:  

好强啊,谢谢提供!

2008-1-3 11:57
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
zhangzhaoc
新手上路





积分 16
发帖 8
注册 2008-1-28
状态 离线
『第 4 楼』:  

老是提示产品密匙错误

2008-1-28 14:39
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
slore
铂金会员





积分 5212
发帖 2478
注册 2007-2-8
状态 离线
『第 5 楼』:  

长……

2008-1-28 15:24
查看资料  发短消息 网志   编辑帖子  回复  引用回复
vkill
金牌会员





积分 4103
发帖 1744
注册 2006-1-20
来自 甘肃.临泽
状态 离线
『第 6 楼』:  

佩服楼主的耐性

2008-1-29 03:38
查看资料  发送邮件  访问主页  发短消息 网志   编辑帖子  回复  引用回复
jiangjie
初级用户




积分 55
发帖 23
注册 2007-4-2
状态 离线
『第 7 楼』:  

帮不上忙了,现在没电脑阿




我的网盘
2008-1-30 13:19
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复

请注意:您目前尚未注册或登录,请您注册登录以使用论坛的各项功能,例如发表和回复帖子等。


可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题



论坛跳转: