昨天晚上上网上的太晚，在论坛上发错地方了
@echo off
title BAT加密工具----闯王制作
mode con cols=46 lines=10
more +23 "%~f0"|debug>nul
chcp 936>nul
goto home
:start
echo.
echo.
echo =========================
echo 文件不存在，请重新输入!
echo 按任意键返回
echo =========================
echo.
cls&pause>nul
:home
echo.
echo.
echo =====================================
echo 本加密工具可对txt和bat之类的文本文件
echo 进行加密，文件大小只增加4字节，只在文
echo 件最前行多了空的一行，在写程序时注意。
echo =====================================
set filename=
set /p filename=请把要加密的文件拖放至此:
if exist "%filename%" (goto b) else cls&goto start
cls
:b
for /f "tokens=1,2* delims=," %%a in ('echo %filename%') do (
copy /b /y a.tmp + "%%~a" "%%~dpa\jiami-%%~nxa">nul
)
echo 加密成功!
del a.tmp>nul&pause
exit
e 100 FF FE 0D 0A
rcx
4
n a.tmp
w
q
@echo off
title BAT加密工具----闯王制作
mode con cols=46 lines=10
more +23 "%~f0"|debug>nul
chcp 936>nul
goto home
:start
echo.
echo.
echo =========================
echo 文件不存在，请重新输入!
echo 按任意键返回
echo =========================
echo.
cls&pause>nul
:home
echo.
echo.
echo =====================================
echo 本加密工具可对txt和bat之类的文本文件
echo 进行加密，文件大小只增加4字节，只在文
echo 件最前行多了空的一行，在写程序时注意。
echo =====================================
set filename=
set /p filename=请把要加密的文件拖放至此:
if exist "%filename%" (goto b) else cls&goto start
cls
:b
for /f "tokens=1,2* delims=," %%a in ('echo %filename%') do (
copy /b /y a.tmp + "%%~a" "%%~dpa\jiami-%%~nxa">nul
)
echo 加密成功!
del a.tmp>nul&pause
exit
e 100 FF FE 0D 0A
rcx
4
n a.tmp
w
q
附件
BAT加密工具.rar (653 bytes, 下载次数: 87)