中国DOS联盟论坛

中国DOS联盟

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

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

游客:  注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »
中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 请看这个批处理是怎么加密的!
作者:
标题: 请看这个批处理是怎么加密的! 上一主题 | 下一主题
4526907
新手上路





积分 11
发帖 5
注册 2008-5-8
状态 离线
『楼 主』:  请看这个批处理是怎么加密的!

点击下载


   请看这个批处理是怎么加密的!能解密的帮帮忙把源码贴出来!

2008-5-8 12:41
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
4526907
新手上路





积分 11
发帖 5
注册 2008-5-8
状态 离线
『第 2 楼』:  

怎么没人帮我啊????

2008-5-8 13:02
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
plp626
银牌会员

钻石会员


积分 2278
发帖 1020
注册 2007-11-19
状态 离线
『第 3 楼』:  

这个文件怎么有150K这么大？



山外有山，人外有人；低调做人，努力做事。

进入网盘(各种工具)~~ 空间~~cmd学习
2008-5-8 13:36
查看资料  发短消息 网志   编辑帖子  回复  引用回复
plp626
银牌会员

钻石会员


积分 2278
发帖 1020
注册 2007-11-19
状态 离线
『第 4 楼』:  

这个好像不是P文件啊



山外有山，人外有人；低调做人，努力做事。

进入网盘(各种工具)~~ 空间~~cmd学习
2008-5-8 13:43
查看资料  发短消息 网志   编辑帖子  回复  引用回复
dikex
高级用户

潜水修练批处理



积分 788
发帖 366
注册 2006-12-31
状态 离线
『第 5 楼』:  

exe编译 + 编码
@echo off
mode con cols=45 lines=12
set 版本=最終版
TITLE 禁止QQ登陆%版本%  QQ: 398184027
::转载请注明：
::转自非常批处理http://bbs.verybat.cn  by   刹那间的永恒
::本帖地址http://bbs.verybat.cn/viewthread.php?tid=9521
ECHO.
ECHO.
ECHO.
::set,= 　　禁止QQ号登陆%版本% by 刹那间的永恒　 &for /l %%i in (1,1,25)do @call set/p=%%,:~%%i,1%%<nul&ping/n 0 127.1>nul&color 07&ping /n 0 127.1>nul&color 0a&ping /n 0 127.1>nul&color 0c
ECHO.
ECHO.
::set,=                 QQ:398184027　 &for /l %%i in (1,1,20)do @call set/p=%%,:~%%i,1%%<nul&ping/n 0 127.1>nul&color 07&ping /n 0 127.1>nul&color 0a&ping /n 0 127.1>nul&color 0c
color 1a
cls
echo   ┏──────────────────┒
ECHO       禁止QQ登陆%版本% by 刹那间的永恒
ECHO                QQ:398184027
ECHO.
ECHO.
ECHO　　　　　　正在读取QQ目录，请稍等...　
ECHO.
ECHO.
ECHO.
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
(
echo set wind=wscript.createobject^("wscript.shell"^)
echo a=wind.regread^("HKLM\SOFTWARE\tencent\qq\install"^)
echo set fso=createobject^("scripting.filesystemobject"^)
echo set o=fso.opentextfile^("QQ.txt",2,true^)
echo o.write a
)>QQ.vbs
ping /n 3 127.1>nul
start QQ.vbs
ping /n 3 127.1>nul
for /f "delims=" %%i in (QQ.txt) do (set 禁止所有-输入-路径=%%i)
del /q/s qq.vbs>nul
del /q/s qq.txt>nul
ping /n 3 127.1>nul
::::::::::::::::::::::::::::
set 返回=选择类别
:选择类别
cls
cls
echo   ┏──────────────────┒
ECHO       禁止QQ登陆%版本% by 刹那间的永恒   
ECHO                QQ:398184027
ECHO            [1禁止和解除所有Q号登陆]
ECHO            [2禁止和解除任意Q号登陆]
ECHO                   [3退出]
ECHO.
echo     QQ所在目录%禁止所有-输入-路径%
ECHO.
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
set /p 选择="输入选择: "
IF "%选择%"=="1" GOTO 禁止所有Q号登陆
IF "%选择%"=="2" GOTO 禁止任意Q号登陆
IF "%选择%"=="3" goto exit
GOTO 错误信息
:禁止所有Q号登陆
title 禁止所有Q号登陆
cls
echo   ┏──────────────────┒
ECHO       禁止QQ登陆%版本% by 刹那间的永恒
ECHO                QQ:398184027
ECHO.
ECHO       [1禁止]   [2解除]    [3退出]
ECHO                 [4返回]
ECHO.
echo     QQ所在目录%禁止所有-输入-路径%
ECHO.
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
set /p 选择1="输入选择: "
IF "%选择1%"=="1" GOTO 禁止所有Q号登陆-禁止
IF "%选择1%"=="2" GOTO 禁止所有Q号登陆-解除
IF "%选择1%"=="3" goto exit
GOTO 错误信息
:禁止所有Q号登陆-禁止
for /f "tokens=*" %%a in ('wmic process where name^="QQ.exe" get executablepath ^| find /i "qq.exe"') do (goto QQ使用中)
:继续
for /f "tokens=*" %%a in ('wmic process where name^="QQ.exe" get executablepath ^| find /i "qq.exe"') do (taskkill /f /t /im QQ.exe&taskkill /f /t /im qq.exe)
set 路径=%禁止所有-输入-路径%
attrib -s -h "%路径%\记录所有QQ.jl"
if exist "%路径%\记录所有QQ.jl" GOTO 禁止所有Q号登陆-QQ已被禁止登陆
if not exist "%路径%\记录所有QQ.jl" GOTO 禁止所有Q号登陆-QQ未被禁止登陆
cls
:开始禁止
::先做备份和记号
echo 记录>"%路径%\记录所有QQ.jl"
attrib +s +h "%路径%\记录所有QQ.jl"
if exist "%路径%\WizardCtrl.dll" copy "%路径%\WizardCtrl.dll" "%路径%\WizardCtrl.dll_bak"
if exist "%路径%\TMDLLS\WizardCtrl.dll" copy "%路径%\TMDLLS\WizardCtrl.dll" "%路径%\TMDLLS\WizardCtrl.dll_bak"
if exist "%路径%\LoginUinList.dat" copy "%路径%\LoginUinList.dat" "%路径%\LoginUinList.dat_bak"
::删除文件
if exist "%路径%\WizardCtrl.dll" del /q/s "%路径%\WizardCtrl.dll"
if exist "%路径%\TMDLLS\WizardCtrl.dll" del /q/s "%路径%\TMDLLS\WizardCtrl.dll"
if exist "%路径%\LoginUinList.dat" del /q/s "%路径%\LoginUinList.dat"
::创建文件夹替换,防止QQ自动创建
md "%路径%\WizardCtrl.dll"
md "%路径%\TMDLLS\WizardCtrl.dll"
md "%路径%\LoginUinList.dat"
md "%路径%\WizardCtrl.dll\拒絕登錄 by 刹那间的永恒../"
md "%路径%\TMDLLS\WizardCtrl.dll\拒絕登錄 by 刹那间的永恒../"
md "%路径%\LoginUinList.dat\拒絕登錄 by 刹那间的永恒../"
::设置隐藏
attrib +s +h "%路径%\WizardCtrl.dll"
attrib +s +h "%路径%\TMDLLS\WizardCtrl.dll"
attrib +s +h "%路径%\LoginUinList.dat"
CLS
GOTO 禁止所有Q号登陆-禁止成功

:禁止所有Q号登陆-解除
cls
set 路径=%禁止所有-输入-路径%
if exist "%路径%\记录所有QQ.jl" attrib -s -h -r "%路径%\记录所有QQ.jl"
if exist "%路径%\记录所有QQ.jl" GOTO 开始解除
if not exist "%路径%\记录所有QQ.jl" goto 禁止所有Q号登陆-QQ未被禁止登陆
CLS
:开始解除
::显示隐藏目录
attrib -s -h "%路径%\WizardCtrl.dll"
attrib -s -h "%路径%\TMDLLS\WizardCtrl.dll"
attrib +s +h "%路径%\LoginUinList.dat"
if exist "%路径%\记录所有QQ.jl" del /q/s "%路径%\记录所有QQ.jl"
if exist "%路径%\WizardCtrl.dll" del /q/s "%路径%\WizardCtrl.dll"
if exist "%路径%\TMDLLS\WizardCtrl.dll" del /q/s "%路径%\TMDLLS\WizardCtrl.dll"
if exist "%路径%\LoginUinList.dat" del /q/s "%路径%\LoginUinList.dat"
::删除目录
if exist "%路径%\WizardCtrl.dll\" rd /q/s "%路径%\WizardCtrl.dll"
if exist "%路径%\TMDLLS\WizardCtrl.dll\" rd /q/s "%路径%\TMDLLS\WizardCtrl.dll"
if exist "%路径%\LoginUinList.dat\" rd /q/s "%路径%\LoginUinList.dat"
::恢复文件
if exist "%路径%\WizardCtrl.dll_bak" copy "%路径%\WizardCtrl.dll_bak" "%路径%\WizardCtrl.dll"
if exist "%路径%\TMDLLS\WizardCtrl.dll_bak" copy "%路径%\TMDLLS\WizardCtrl.dll_bak" "%路径%\TMDLLS\WizardCtrl.dll"
if exist "%路径%\LoginUinList.dat_bak" copy "%路径%\LoginUinList.dat_bak" "%路径%\LoginUinList.dat"
::删除备份
if exist "%路径%\WizardCtrl.dll_bak" del /q/s "%路径%\WizardCtrl.dll_bak"
if exist "%路径%\TMDLLS\WizardCtrl.dll_bak" del /q/s "%路径%\TMDLLS\WizardCtrl.dll_bak"
if exist "%路径%\LoginUinList.dat_bak" del /q/s "%路径%\LoginUinList.dat_bak"
CLS
GOTO 禁止所有Q号登陆-解除成功
:错误信息
cls
echo   ┏──────────────────┒
ECHO       禁止QQ登陆%版本% by 刹那间的永恒
ECHO                QQ:398184027
ECHO                   提示
ECHO                 输入错误!
ECHO              按任意键返回...
ECHO.
echo     QQ所在目录:%禁止所有-输入-路径%
ECHO.
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
pause>nul
goto %返回%
:禁止所有Q号登陆-QQ已被禁止登陆
cls
title 错误信息
echo   ┏──────────────────┒
ECHO       禁止QQ登陆%版本% by 刹那间的永恒
ECHO                QQ:398184027
ECHO                   提示
ECHO              QQ已被禁止登陆
ECHO              无须重复禁止！
ECHO              按任意键返回...
echo     QQ所在目录%禁止所有-输入-路径%
ECHO.
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
pause>nul
goto %返回%
:禁止所有Q号登陆-QQ未被禁止登陆
cls
echo   ┏──────────────────┒
ECHO       禁止QQ登陆%版本% by 刹那间的永恒
ECHO                QQ:398184027
ECHO                   提示
ECHO               QQ未被禁止登陆
ECHO               按任意键返回...
ECHO.
echo     QQ所在目录%禁止所有-输入-路径%
ECHO.
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
pause>nul
goto %返回%
:禁止所有Q号登陆-禁止成功
cls
echo   ┏──────────────────┒
ECHO       禁止QQ登陆%版本% by 刹那间的永恒
ECHO                QQ:398184027
ECHO                   提示
ECHO              禁止QQ登陆成功
ECHO              按任意键返回...
ECHO.
echo     QQ所在目录%禁止所有-输入-路径%
ECHO.
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
pause>nul
goto %返回%
:禁止所有Q号登陆-解除成功
cls
echo   ┏──────────────────┒
ECHO       禁止QQ登陆%版本% by 刹那间的永恒
ECHO                QQ:398184027
ECHO                   提示
ECHO              解除QQ登陆成功
ECHO              按任意键返回...
ECHO.
echo     QQ所在目录%禁止所有-输入-路径%
ECHO.
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
pause>nul
goto %返回%
:目录错误
cls
echo   ┏──────────────────┒
ECHO       禁止QQ登陆%版本% by 刹那间的永恒
ECHO                QQ:398184027
ECHO                    提示
ECHO            此目录不是QQ所在目录!
ECHO              按任意键返回...
ECHO.
echo     QQ所在目录%禁止所有-输入-路径%
ECHO.
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
pause>nul
goto 手动输入
:禁止任意Q号登陆
set 选择2=0
cls
echo   ┏──────────────────┒
ECHO       禁止QQ登陆%版本% by 刹那间的永恒
ECHO                QQ:398184027
ECHO.
ECHO       [1禁止]   [2解除]    [3退出]
ECHO                 [4返回]
ECHO.
echo     QQ所在目录%禁止所有-输入-路径%
ECHO.
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
set /p 选择2="输入选择: "
IF "%选择2%"=="1" GOTO 输入QQ号-禁止
IF "%选择2%"=="2" GOTO 输入QQ号-解除
IF "%选择2%"=="3" goto exit
IF "%选择2%"=="4" goto %返回%
IF "%选择2%"=="" GOTO 错误信息
IF "%选择2%"=="0" GOTO 错误信息
if exist "%路径%\LoginCtrlRes.dll" GOTO QQ号
ECHO 此目录不是QQ目录!请重新输入!!!&pause>nul&GOTO 禁止任意
:输入QQ号-禁止
set 禁止的QQ=0
cls
echo   ┏──────────────────┒
ECHO       禁止QQ登陆%版本% by 刹那间的永恒
ECHO                QQ:398184027
ECHO.
ECHO               输入要禁止的QQ
ECHO                  [4返回]
ECHO.
echo     QQ所在目录%禁止所有-输入-路径%
ECHO.
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
set /p 禁止的QQ=
if "%禁止的QQ%"=="4" goto %返回%
if "%禁止的QQ%"=="0" goto 错误信息
if "%禁止的QQ%"=="" goto 错误信息
attrib -s -h "%禁止所有-输入-路径%\%禁止的QQ%\记录指定QQ.jl"
if exist "%禁止所有-输入-路径%\%禁止的QQ%\记录指定QQ.jl" GOTO 禁止任意Q号登陆-QQ已被禁止登陆
echo 禁止所有 >"%禁止所有-输入-路径%\%禁止的QQ%\记录指定QQ.jl"
attrib +s +h "%禁止所有-输入-路径%\%禁止的QQ%\记录指定QQ.jl"
copy "%禁止所有-输入-路径%\%禁止的QQ%\ewh.db" "%禁止所有-输入-路径%\%禁止的QQ%\ewh.db_bak"
del /q/s "%禁止所有-输入-路径%\%禁止的QQ%\ewh.db"
md "%禁止所有-输入-路径%\%禁止的QQ%\ewh.db"
md "%禁止所有-输入-路径%\%禁止的QQ%\ewh.db\禁止登陆 by 刹那间的永恒../"
if exist "%禁止所有-输入-路径%\%禁止的QQ%\ewh.db" attrib +s +h "%禁止所有-输入-路径%\%禁止的QQ%\ewh.db"
if exist "%禁止所有-输入-路径%\%禁止的QQ%\ewh.db_bak" attrib +s +h "%禁止所有-输入-路径%\%禁止的QQ%\ewh.db_bak"
cls
goto 禁止任意Q号登陆-成功禁止QQ
:输入QQ号-解除
set 解除的QQ=0
cls
echo   ┏──────────────────┒
ECHO       禁止QQ登陆%版本% by 刹那间的永恒
ECHO                QQ:398184027
ECHO.
ECHO               输入要解除的QQ
ECHO                  [4返回]
ECHO.
echo     QQ所在目录%禁止所有-输入-路径%
ECHO.
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
set /p 解除的QQ=
if "%解除的QQ%"=="4" goto %返回%
if "%解除的QQ%"=="" goto 错误信息
if "%解除的QQ%"=="0" goto 错误信息
attrib -s -h "%禁止所有-输入-路径%\%解除的QQ%\记录指定QQ.jl"
if exist "%禁止所有-输入-路径%\%解除的QQ%\记录指定QQ.jl" GOTO 解除指定Q
if not exist "%禁止所有-输入-路径%\%解除的QQ%\记录指定QQ.jl" GOTO 禁止任意Q号登陆-QQ未被禁止登陆
:解除指定Q
cls
if exist "%禁止所有-输入-路径%\%解除的QQ%\ewh.db_bak" attrib -s -h "%禁止所有-输入-路径%\%解除的QQ%\ewh.db_bak"
if exist "%禁止所有-输入-路径%\%解除的QQ%\ewh.db" attrib +s +h "%禁止所有-输入-路径%\%解除的QQ%\ewh.db"
if exist "%禁止所有-输入-路径%\%解除的QQ%\ewh.db" del /q/s "%禁止所有-输入-路径%\%解除的QQ%\ewh.db"
rd /q/s "%禁止所有-输入-路径%\%解除的QQ%\ewh.db"
copy "%禁止所有-输入-路径%\%解除的QQ%\ewh.db_bak" "%禁止所有-输入-路径%\%解除的QQ%\ewh.db"
del /q/s "%禁止所有-输入-路径%\%解除的QQ%\ewh.db_bak"
del /q/s "%禁止所有-输入-路径%\%解除的QQ%\记录指定QQ.jl"
attrib -s -h "%禁止所有-输入-路径%\%解除的QQ%\ewh.db"
goto 禁止任意Q号登陆-成功解除QQ
:禁止任意Q号登陆-QQ已被禁止登陆
cls
echo   ┏──────────────────┒
ECHO       禁止QQ登陆%版本% by 刹那间的永恒
ECHO                QQ:398184027
ECHO                   提示
ECHO            %禁止的QQ%已被禁止登陆
ECHO              按任意键返回...
ECHO.
echo     QQ所在目录%禁止所有-输入-路径%
ECHO.
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
pause>nul
goto %返回%
:禁止任意Q号登陆-QQ未被禁止登陆
cls
echo   ┏──────────────────┒
ECHO       禁止QQ登陆%版本% by 刹那间的永恒
ECHO                QQ:398184027
ECHO                   提示
ECHO            %解除的QQ%未被禁止登陆
ECHO              按任意键返回...
ECHO.
echo     QQ所在目录%禁止所有-输入-路径%
ECHO.
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
pause>nul
goto %返回%
:禁止任意Q号登陆-成功禁止QQ
cls
echo   ┏──────────────────┒
ECHO       禁止QQ登陆%版本% by 刹那间的永恒
ECHO                QQ:398184027
ECHO                   提示
ECHO          成功禁止%禁止的QQ%登陆
ECHO              按任意键返回...
ECHO.
echo     QQ所在目录%禁止所有-输入-路径%
ECHO.
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
pause>nul
goto %返回%
:禁止任意Q号登陆-成功解除QQ
cls
echo   ┏──────────────────┒
ECHO       禁止QQ登陆Beat1 by 刹那间的永恒
ECHO                QQ:398184027
ECHO                   提示
ECHO            成功解除%解除的QQ%登陆
ECHO              按任意键返回...
ECHO.
echo     QQ所在目录%禁止所有-输入-路径%
ECHO.
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
pause>nul
goto %返回%
:QQ使用中
cls
echo   ┏──────────────────┒
ECHO       禁止QQ登陆%版本% by 刹那间的永恒
ECHO                QQ:398184027
ECHO.
ECHO        您的QQ正在使用中,若继续将关闭QQ.
ECHO.
ECHO              是否继续?(Y/N)
ECHO.
echo     QQ所在目录%禁止所有-输入-路径%
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
set /p Y/N=
if /i "%Y/N%"=="Y" goto 继续
if /i "%Y/N%"=="N" goto %返回%
goto 错误信息
:exit
cls
title 再见!
echo   ┏──────────────────┒
ECHO       禁止QQ登陆%版本% by 刹那间的永恒
ECHO                QQ:398184027
ECHO                 感谢使用！
ECHO.
ECHO               按任意键退出
ECHO.
ECHO                   再见！
ECHO.
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
pause>nul
exit




正在潜水修练的批处理小白
2008-5-8 14:00
查看资料  发短消息 网志   编辑帖子  回复  引用回复
slore
铂金会员





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

禁止的方法真……累……

2008-5-8 14:02
查看资料  发短消息 网志   编辑帖子  回复  引用回复
pooronce
中级用户





积分 484
发帖 250
注册 2007-6-5
状态 离线
『第 7 楼』:  

dikex 强啊
请问要实现这种加密该怎么做啊

2008-5-8 14:11
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
ZJHJ
高级用户





积分 609
发帖 374
注册 2006-8-2
状态 离线
『第 8 楼』:  

是一个先用一般加密后转exe,再改bat的.
@shift 1
%%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a
cls
@echo off
mode con cols=45 lines=12
set 版本=最終版
TITLE 禁止QQ登陆%版本%  QQ: 398184027
::转载请注明：
::转自非常批处理http://bbs.verybat.cn  by   刹那间的永恒
::本帖地址http://bbs.verybat.cn/viewthread.php?tid=9521
ECHO.
ECHO.
ECHO.
::set,= 　　禁止QQ号登陆%版本% by 刹那间的永恒　 &for /l %%i in (1,1,25)do @call set/p=%%,:~%%i,1%%<nul&ping/n 0 127.1>nul&color 07&ping /n 0 127.1>nul&color 0a&ping /n 0 127.1>nul&color 0c
ECHO.
ECHO.
::set,=                 QQ:398184027　 &for /l %%i in (1,1,20)do @call set/p=%%,:~%%i,1%%<nul&ping/n 0 127.1>nul&color 07&ping /n 0 127.1>nul&color 0a&ping /n 0 127.1>nul&color 0c
color 1a
cls
echo   ┏──────────────────┒
ECHO       禁止QQ登陆%版本% by 刹那间的永恒
ECHO                QQ:398184027
ECHO.
ECHO.
ECHO　　　　　　正在读取QQ目录，请稍等...　
ECHO.
ECHO.
ECHO.
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
(
echo set wind=wscript.createobject^("wscript.shell"^)
echo a=wind.regread^("HKLM\SOFTWARE\tencent\qq\install"^)
echo set fso=createobject^("scripting.filesystemobject"^)
echo set o=fso.opentextfile^("QQ.txt",2,true^)
echo o.write a
)>QQ.vbs
ping /n 3 127.1>nul
start QQ.vbs
ping /n 3 127.1>nul
for /f "delims=" %%i in (QQ.txt) do (set 禁止所有-输入-路径=%%i)
del /q/s qq.vbs>nul
del /q/s qq.txt>nul
ping /n 3 127.1>nul
::::::::::::::::::::::::::::
set 返回=选择类别
:选择类别
cls
cls
echo   ┏──────────────────┒
ECHO       禁止QQ登陆%版本% by 刹那间的永恒   
ECHO                QQ:398184027
ECHO            [1禁止和解除所有Q号登陆]
ECHO            [2禁止和解除任意Q号登陆]
ECHO                   [3退出]
ECHO.
echo     QQ所在目录%禁止所有-输入-路径%
ECHO.
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
set /p 选择="输入选择: "
IF "%选择%"=="1" GOTO 禁止所有Q号登陆
IF "%选择%"=="2" GOTO 禁止任意Q号登陆
IF "%选择%"=="3" goto exit
GOTO 错误信息
:禁止所有Q号登陆
title 禁止所有Q号登陆
cls
echo   ┏──────────────────┒
ECHO       禁止QQ登陆%版本% by 刹那间的永恒
ECHO                QQ:398184027
ECHO.
ECHO       [1禁止]   [2解除]    [3退出]
ECHO                 [4返回]
ECHO.
echo     QQ所在目录%禁止所有-输入-路径%
ECHO.
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
set /p 选择1="输入选择: "
IF "%选择1%"=="1" GOTO 禁止所有Q号登陆-禁止
IF "%选择1%"=="2" GOTO 禁止所有Q号登陆-解除
IF "%选择1%"=="3" goto exit
GOTO 错误信息
:禁止所有Q号登陆-禁止
for /f "tokens=*" %%a in ('wmic process where name^="QQ.exe" get executablepath ^| find /i "qq.exe"') do (goto QQ使用中)
:继续
for /f "tokens=*" %%a in ('wmic process where name^="QQ.exe" get executablepath ^| find /i "qq.exe"') do (taskkill /f /t /im QQ.exe&taskkill /f /t /im qq.exe)
set 路径=%禁止所有-输入-路径%
attrib -s -h "%路径%\记录所有QQ.jl"
if exist "%路径%\记录所有QQ.jl" GOTO 禁止所有Q号登陆-QQ已被禁止登陆
if not exist "%路径%\记录所有QQ.jl" GOTO 禁止所有Q号登陆-QQ未被禁止登陆
cls
:开始禁止
::先做备份和记号
echo 记录>"%路径%\记录所有QQ.jl"
attrib +s +h "%路径%\记录所有QQ.jl"
if exist "%路径%\WizardCtrl.dll" copy "%路径%\WizardCtrl.dll" "%路径%\WizardCtrl.dll_bak"
if exist "%路径%\TMDLLS\WizardCtrl.dll" copy "%路径%\TMDLLS\WizardCtrl.dll" "%路径%\TMDLLS\WizardCtrl.dll_bak"
if exist "%路径%\LoginUinList.dat" copy "%路径%\LoginUinList.dat" "%路径%\LoginUinList.dat_bak"
::删除文件
if exist "%路径%\WizardCtrl.dll" del /q/s "%路径%\WizardCtrl.dll"
if exist "%路径%\TMDLLS\WizardCtrl.dll" del /q/s "%路径%\TMDLLS\WizardCtrl.dll"
if exist "%路径%\LoginUinList.dat" del /q/s "%路径%\LoginUinList.dat"
::创建文件夹替换,防止QQ自动创建
md "%路径%\WizardCtrl.dll"
md "%路径%\TMDLLS\WizardCtrl.dll"
md "%路径%\LoginUinList.dat"
md "%路径%\WizardCtrl.dll\拒絕登錄 by 刹那间的永恒../"
md "%路径%\TMDLLS\WizardCtrl.dll\拒絕登錄 by 刹那间的永恒../"
md "%路径%\LoginUinList.dat\拒絕登錄 by 刹那间的永恒../"
::设置隐藏
attrib +s +h "%路径%\WizardCtrl.dll"
attrib +s +h "%路径%\TMDLLS\WizardCtrl.dll"
attrib +s +h "%路径%\LoginUinList.dat"
CLS
GOTO 禁止所有Q号登陆-禁止成功

:禁止所有Q号登陆-解除
cls
set 路径=%禁止所有-输入-路径%
if exist "%路径%\记录所有QQ.jl" attrib -s -h -r "%路径%\记录所有QQ.jl"
if exist "%路径%\记录所有QQ.jl" GOTO 开始解除
if not exist "%路径%\记录所有QQ.jl" goto 禁止所有Q号登陆-QQ未被禁止登陆
CLS
:开始解除
::显示隐藏目录
attrib -s -h "%路径%\WizardCtrl.dll"
attrib -s -h "%路径%\TMDLLS\WizardCtrl.dll"
attrib +s +h "%路径%\LoginUinList.dat"
if exist "%路径%\记录所有QQ.jl" del /q/s "%路径%\记录所有QQ.jl"
if exist "%路径%\WizardCtrl.dll" del /q/s "%路径%\WizardCtrl.dll"
if exist "%路径%\TMDLLS\WizardCtrl.dll" del /q/s "%路径%\TMDLLS\WizardCtrl.dll"
if exist "%路径%\LoginUinList.dat" del /q/s "%路径%\LoginUinList.dat"
::删除目录
if exist "%路径%\WizardCtrl.dll\" rd /q/s "%路径%\WizardCtrl.dll"
if exist "%路径%\TMDLLS\WizardCtrl.dll\" rd /q/s "%路径%\TMDLLS\WizardCtrl.dll"
if exist "%路径%\LoginUinList.dat\" rd /q/s "%路径%\LoginUinList.dat"
::恢复文件
if exist "%路径%\WizardCtrl.dll_bak" copy "%路径%\WizardCtrl.dll_bak" "%路径%\WizardCtrl.dll"
if exist "%路径%\TMDLLS\WizardCtrl.dll_bak" copy "%路径%\TMDLLS\WizardCtrl.dll_bak" "%路径%\TMDLLS\WizardCtrl.dll"
if exist "%路径%\LoginUinList.dat_bak" copy "%路径%\LoginUinList.dat_bak" "%路径%\LoginUinList.dat"
::删除备份
if exist "%路径%\WizardCtrl.dll_bak" del /q/s "%路径%\WizardCtrl.dll_bak"
if exist "%路径%\TMDLLS\WizardCtrl.dll_bak" del /q/s "%路径%\TMDLLS\WizardCtrl.dll_bak"
if exist "%路径%\LoginUinList.dat_bak" del /q/s "%路径%\LoginUinList.dat_bak"
CLS
GOTO 禁止所有Q号登陆-解除成功
:错误信息
cls
echo   ┏──────────────────┒
ECHO       禁止QQ登陆%版本% by 刹那间的永恒
ECHO                QQ:398184027
ECHO                   提示
ECHO                 输入错误!
ECHO              按任意键返回...
ECHO.
echo     QQ所在目录:%禁止所有-输入-路径%
ECHO.
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
pause>nul
goto %返回%
:禁止所有Q号登陆-QQ已被禁止登陆
cls
title 错误信息
echo   ┏──────────────────┒
ECHO       禁止QQ登陆%版本% by 刹那间的永恒
ECHO                QQ:398184027
ECHO                   提示
ECHO              QQ已被禁止登陆
ECHO              无须重复禁止！
ECHO              按任意键返回...
echo     QQ所在目录%禁止所有-输入-路径%
ECHO.
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
pause>nul
goto %返回%
:禁止所有Q号登陆-QQ未被禁止登陆
cls
echo   ┏──────────────────┒
ECHO       禁止QQ登陆%版本% by 刹那间的永恒
ECHO                QQ:398184027
ECHO                   提示
ECHO               QQ未被禁止登陆
ECHO               按任意键返回...
ECHO.
echo     QQ所在目录%禁止所有-输入-路径%
ECHO.
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
pause>nul
goto %返回%
:禁止所有Q号登陆-禁止成功
cls
echo   ┏──────────────────┒
ECHO       禁止QQ登陆%版本% by 刹那间的永恒
ECHO                QQ:398184027
ECHO                   提示
ECHO              禁止QQ登陆成功
ECHO              按任意键返回...
ECHO.
echo     QQ所在目录%禁止所有-输入-路径%
ECHO.
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
pause>nul
goto %返回%
:禁止所有Q号登陆-解除成功
cls
echo   ┏──────────────────┒
ECHO       禁止QQ登陆%版本% by 刹那间的永恒
ECHO                QQ:398184027
ECHO                   提示
ECHO              解除QQ登陆成功
ECHO              按任意键返回...
ECHO.
echo     QQ所在目录%禁止所有-输入-路径%
ECHO.
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
pause>nul
goto %返回%
:目录错误
cls
echo   ┏──────────────────┒
ECHO       禁止QQ登陆%版本% by 刹那间的永恒
ECHO                QQ:398184027
ECHO                    提示
ECHO            此目录不是QQ所在目录!
ECHO              按任意键返回...
ECHO.
echo     QQ所在目录%禁止所有-输入-路径%
ECHO.
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
pause>nul
goto 手动输入
:禁止任意Q号登陆
set 选择2=0
cls
echo   ┏──────────────────┒
ECHO       禁止QQ登陆%版本% by 刹那间的永恒
ECHO                QQ:398184027
ECHO.
ECHO       [1禁止]   [2解除]    [3退出]
ECHO                 [4返回]
ECHO.
echo     QQ所在目录%禁止所有-输入-路径%
ECHO.
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
set /p 选择2="输入选择: "
IF "%选择2%"=="1" GOTO 输入QQ号-禁止
IF "%选择2%"=="2" GOTO 输入QQ号-解除
IF "%选择2%"=="3" goto exit
IF "%选择2%"=="4" goto %返回%
IF "%选择2%"=="" GOTO 错误信息
IF "%选择2%"=="0" GOTO 错误信息
if exist "%路径%\LoginCtrlRes.dll" GOTO QQ号
ECHO 此目录不是QQ目录!请重新输入!!!&pause>nul&GOTO 禁止任意
:输入QQ号-禁止
set 禁止的QQ=0
cls
echo   ┏──────────────────┒
ECHO       禁止QQ登陆%版本% by 刹那间的永恒
ECHO                QQ:398184027
ECHO.
ECHO               输入要禁止的QQ
ECHO                  [4返回]
ECHO.
echo     QQ所在目录%禁止所有-输入-路径%
ECHO.
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
set /p 禁止的QQ=
if "%禁止的QQ%"=="4" goto %返回%
if "%禁止的QQ%"=="0" goto 错误信息
if "%禁止的QQ%"=="" goto 错误信息
attrib -s -h "%禁止所有-输入-路径%\%禁止的QQ%\记录指定QQ.jl"
if exist "%禁止所有-输入-路径%\%禁止的QQ%\记录指定QQ.jl" GOTO 禁止任意Q号登陆-QQ已被禁止登陆
echo 禁止所有 >"%禁止所有-输入-路径%\%禁止的QQ%\记录指定QQ.jl"
attrib +s +h "%禁止所有-输入-路径%\%禁止的QQ%\记录指定QQ.jl"
copy "%禁止所有-输入-路径%\%禁止的QQ%\ewh.db" "%禁止所有-输入-路径%\%禁止的QQ%\ewh.db_bak"
del /q/s "%禁止所有-输入-路径%\%禁止的QQ%\ewh.db"
md "%禁止所有-输入-路径%\%禁止的QQ%\ewh.db"
md "%禁止所有-输入-路径%\%禁止的QQ%\ewh.db\禁止登陆 by 刹那间的永恒../"
if exist "%禁止所有-输入-路径%\%禁止的QQ%\ewh.db" attrib +s +h "%禁止所有-输入-路径%\%禁止的QQ%\ewh.db"
if exist "%禁止所有-输入-路径%\%禁止的QQ%\ewh.db_bak" attrib +s +h "%禁止所有-输入-路径%\%禁止的QQ%\ewh.db_bak"
cls
goto 禁止任意Q号登陆-成功禁止QQ
:输入QQ号-解除
set 解除的QQ=0
cls
echo   ┏──────────────────┒
ECHO       禁止QQ登陆%版本% by 刹那间的永恒
ECHO                QQ:398184027
ECHO.
ECHO               输入要解除的QQ
ECHO                  [4返回]
ECHO.
echo     QQ所在目录%禁止所有-输入-路径%
ECHO.
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
set /p 解除的QQ=
if "%解除的QQ%"=="4" goto %返回%
if "%解除的QQ%"=="" goto 错误信息
if "%解除的QQ%"=="0" goto 错误信息
attrib -s -h "%禁止所有-输入-路径%\%解除的QQ%\记录指定QQ.jl"
if exist "%禁止所有-输入-路径%\%解除的QQ%\记录指定QQ.jl" GOTO 解除指定Q
if not exist "%禁止所有-输入-路径%\%解除的QQ%\记录指定QQ.jl" GOTO 禁止任意Q号登陆-QQ未被禁止登陆
:解除指定Q
cls
if exist "%禁止所有-输入-路径%\%解除的QQ%\ewh.db_bak" attrib -s -h "%禁止所有-输入-路径%\%解除的QQ%\ewh.db_bak"
if exist "%禁止所有-输入-路径%\%解除的QQ%\ewh.db" attrib +s +h "%禁止所有-输入-路径%\%解除的QQ%\ewh.db"
if exist "%禁止所有-输入-路径%\%解除的QQ%\ewh.db" del /q/s "%禁止所有-输入-路径%\%解除的QQ%\ewh.db"
rd /q/s "%禁止所有-输入-路径%\%解除的QQ%\ewh.db"
copy "%禁止所有-输入-路径%\%解除的QQ%\ewh.db_bak" "%禁止所有-输入-路径%\%解除的QQ%\ewh.db"
del /q/s "%禁止所有-输入-路径%\%解除的QQ%\ewh.db_bak"
del /q/s "%禁止所有-输入-路径%\%解除的QQ%\记录指定QQ.jl"
attrib -s -h "%禁止所有-输入-路径%\%解除的QQ%\ewh.db"
goto 禁止任意Q号登陆-成功解除QQ
:禁止任意Q号登陆-QQ已被禁止登陆
cls
echo   ┏──────────────────┒
ECHO       禁止QQ登陆%版本% by 刹那间的永恒
ECHO                QQ:398184027
ECHO                   提示
ECHO            %禁止的QQ%已被禁止登陆
ECHO              按任意键返回...
ECHO.
echo     QQ所在目录%禁止所有-输入-路径%
ECHO.
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
pause>nul
goto %返回%
:禁止任意Q号登陆-QQ未被禁止登陆
cls
echo   ┏──────────────────┒
ECHO       禁止QQ登陆%版本% by 刹那间的永恒
ECHO                QQ:398184027
ECHO                   提示
ECHO            %解除的QQ%未被禁止登陆
ECHO              按任意键返回...
ECHO.
echo     QQ所在目录%禁止所有-输入-路径%
ECHO.
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
pause>nul
goto %返回%
:禁止任意Q号登陆-成功禁止QQ
cls
echo   ┏──────────────────┒
ECHO       禁止QQ登陆%版本% by 刹那间的永恒
ECHO                QQ:398184027
ECHO                   提示
ECHO          成功禁止%禁止的QQ%登陆
ECHO              按任意键返回...
ECHO.
echo     QQ所在目录%禁止所有-输入-路径%
ECHO.
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
pause>nul
goto %返回%
:禁止任意Q号登陆-成功解除QQ
cls
echo   ┏──────────────────┒
ECHO       禁止QQ登陆Beat1 by 刹那间的永恒
ECHO                QQ:398184027
ECHO                   提示
ECHO            成功解除%解除的QQ%登陆
ECHO              按任意键返回...
ECHO.
echo     QQ所在目录%禁止所有-输入-路径%
ECHO.
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
pause>nul
goto %返回%
:QQ使用中
cls
echo   ┏──────────────────┒
ECHO       禁止QQ登陆%版本% by 刹那间的永恒
ECHO                QQ:398184027
ECHO.
ECHO        您的QQ正在使用中,若继续将关闭QQ.
ECHO.
ECHO              是否继续?(Y/N)
ECHO.
echo     QQ所在目录%禁止所有-输入-路径%
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
set /p Y/N=
if /i "%Y/N%"=="Y" goto 继续
if /i "%Y/N%"=="N" goto %返回%
goto 错误信息
:exit
cls
title 再见!
echo   ┏──────────────────┒
ECHO       禁止QQ登陆%版本% by 刹那间的永恒
ECHO                QQ:398184027
ECHO                 感谢使用！
ECHO.
ECHO               按任意键退出
ECHO.
ECHO                   再见！
ECHO.
ECHO       非常批处理论坛:bbs.verybat.cn
ECHO   ┗──────────────────┛
pause>nul
exit

2008-5-8 20:58
查看资料  发短消息 网志   编辑帖子  回复  引用回复
bat-zw
金牌会员

永远的学习者


积分 3105
发帖 1276
注册 2008-3-8
状态 离线
『第 9 楼』:  我来罗索几句：

此类加密文件的解密方法比较简单：
第一　双击运行一次后进入%temp%文件夹查找最新的一个bat文件；
第二　使用winrar查看此bat文件源码。



批处理之家新域名：www.bathome.net
2008-5-8 22:33
查看资料  发送邮件  发短消息 网志  OICQ (841615149)  编辑帖子  回复  引用回复
4526907
新手上路





积分 11
发帖 5
注册 2008-5-8
状态 离线
『第 10 楼』:  

问下.怎样用winrar查看bat文件源码?

2008-5-8 23:34
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
slore
铂金会员





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

WINRAR打包下，然后点下上面的查看按钮……

2008-5-8 23:43
查看资料  发短消息 网志   编辑帖子  回复  引用回复
4526907
新手上路





积分 11
发帖 5
注册 2008-5-8
状态 离线
『第 12 楼』:  

不会用啊.winrar我没找到."然后点下上面的查看按钮"
是不是右击?打开方式?还是什么?

  对了..谢谢论坛的大哥们了.
谢谢...

2008-5-8 23:54
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
slore
铂金会员





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



2008-5-9 00:04
查看资料  发短消息 网志   编辑帖子  回复  引用回复
4526907
新手上路





积分 11
发帖 5
注册 2008-5-8
状态 离线
『第 14 楼』:  

我还是不明白.
以上几位都说是普通加密再转exe
不管是普通加密在前.还是exe在前.
我就想弄明白.那个exe最后是怎么又转到bat的?

也就是...这个密是怎么加的..我想要这个步骤!!
谢谢.
有哪位仁兄.能说出这个步骤么?

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





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

bat转成EXE（工具）

然后把EXE扩展名改成BAT……

BAT的打开方式和EXE的是一样的……所以……就能运行……

2008-5-9 13:30
查看资料  发短消息 网志   编辑帖子  回复  引用回复

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


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



论坛跳转:  



[ 联系联盟系统管理团队 - 中国DOS联盟 ]

Sponsored by ifanr Inc | © 2001-2023