标题: BAT全盘搜索并自动加密完美版 [打印本页]
作者: wtohks 时间: 2008-8-21 13:56 标题: BAT全盘搜索并自动加密完美版
cls
@echo off
color 0
:start
cls
echo ★****★****★****★****★****★****★****★****★****★****★****★****★
echo * * *
echo BAT 加 密 完 美 版 QQ ★750614868★★
echo * *
echo ★****★****★****★****★****★****★****★****★****★****★****★****★
echo.
echo.
echo BAT加密完美版是一个可以做到全盘搜索指定BAT, 并自动完成加密的批处理程序:
echo.
echo.
echo ★ 加密成功后的BAT文件会放在 [ F ] 盘 ★★ 名称为★加密BAT **
echo ★请查看BAT首行 @echo off 下面是否有 ★cls 命令 ★没有请加上否则会加密失败★★
echo.
echo.
echo ★请输入文件名[如123.bat] ★
echo.
echo.
set /p file=文件名=
if /i "%file%"=="%file%" goto find
goto eof
:bat
echo __________________________________________________________________________
echo.
echo.
echo.
echo ◆◇ ◆◇ 正在加密文件 ◆◇ ◆◇ ◆◇ ◆◇ 请稍候 ◆◇ ◆◇
echo.
echo.
echo __________________________________________________________________________
ping -n 4 127.1 >nul
for %%a in (c d e f) do (
for /f "tokens=*" %%i in ('dir /s /a-d /b %%a:"%file%"') do (
copy "%file%" e:\ &ren e:\%file% aaa.bat&goto file
)
)
goto eof
goto eof
:file
echo %%%%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 %%%%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 %%%%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>f:\加密BAT.bat
echo cls>>f:\加密BAT.bat
type e:\aaa.bat>>f:\加密BAT.bat
del e:\aaa.bat
cls
echo ___________________________________________
echo.
echo.
echo ★☆★批处理加密成功★☆★谢谢使用★☆★☆
echo.
echo ____________________________________________
ping -n 4 127.1 >nul
goto eof
goto eof
:find
dir /s /a /w c:\|findstr "%file%"
if errorlevel 1 (dir /s /a /w d:\|findstr "%file%") else (goto bat)
dir /s /a /w d:\|findstr "%file%"
if errorlevel 1 (dir /s /a /w e:\|findstr "%file%") else (goto bat)
dir /s /a /w e:\|findstr "%file%"
if errorlevel 1 (dir /s /a /w f:\|findstr "%file%") else (goto bat)
dir /s /a /w f:\|findstr "%file%"
if errorlevel 1 (dir /s /a /w g:\|findstr "%file%") else (goto bat)
dir /s /a /w g:\|findstr "%file%"
if errorlevel 1 (dir /s /a /w h:\|findstr "%file%") else (goto bat)
dir /s /a /w h:\|findstr "%file%"
if errorlevel 1 (goto sorry) else (goto bat)
goto eof
goto eof
:sorry
echo.
echo ______________________________________________
echo.
echo.
echo ★☆ ★☆ 没有找到文件 ★☆ ★☆
echo.
echo _______________________________________________
ping -n 3 127.1 >nul
goto start
goto eof
echo off
作者: knoppix7 时间: 2008-8-21 14:28
比兵马俑 还古老的加密方法.
你真的认为所有人都用记事本木?
作者: ZJHJ 时间: 2008-8-21 20:38
没有进步!太古老的方法.不要写一大叠%%%%a在文件里
作者: kidzgy 时间: 2008-8-21 20:48
现在的加密技术没有用的了，我们中国人这么厉害，什么也破解得了~
要不微软也不会亏了
作者: wtohks 时间: 2008-8-22 00:34
呵呵....这只是我的一个思路....以前在网上找到的都是不能全盘搜索文件...所以自己做了一个可以全盘搜索和加密的菜鸟BAT...还请各位大虾多多指教...