如何给.BAT文件加密

cls

@echo off

@Title Tools code

:Key

set all= 请输入秘钥（若没有，请输入help）

set /p all=请按任意键继续（若没有，请输入help）(获取临时秘钥请发送：user)：

if /i "%all%"=="help" goto Eorry

if /i "%all%"=="user" goto user

if /i "%all%"=="Tools" goto Tools

:Tools

echo 请输入密码打开Tools

set/p "pass=(more than)" goto menu

if NOT %pass%== JAIXUDLW goto FAIL

echo 密码正确

goto menu

:FAIL

echo 密码无效

ping 127.0.0.1 -n 5 >nur

goto Key

:menu

echo 欢迎使用本tool code

echo 秘钥正确！

ping 127.0.0.1 -n 5 >nur

@color 4A

@mode con cols=80 lines=32

@title Me晴朗批处理制作

@echo off

echo 下面内容你自己写

给批处理加密的文件代码如下：

@ECHO off

cls

color f0

echo.

echo.

ECHO批处理文件(.bat .cmd)加密工具

echo.

echo.

echo 说明: 在下面输入需要加密的批处理文件名

echo.

echo 若在此文件的同目录下直接输入“文件名.bat”即可

echo.

echo 也可以带路径指定任意BAT

echo.

echo 加密完成后会在同目录下生成“加密成品.bat”文件

echo.

echo.

echo.

echo.

set /p file=请输入需要加密的批处理后(名+后缀)按回车键(Q=退出):

if "%file%"=="q" goto quit

echo %file%|findstr /i "\.bat$">nul &&goto go

echo %file%|findstr /i "\.cmd$">nul &&goto go

cls

echo ==============

echo 请正确输入!

echo ==============

echo.

echo.

echo 按任意键重新输入......

pause>nul

goto start

:go

if not exist "%file%" goto newly

if exist encrypt.bat copy encrypt.bat encryptbak.bat

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 >"%tmp%\encrypt.tmp"

echo cls>>"%tmp%\encrypt.tmp"

type "%file%">>"%tmp%\encrypt.tmp"

setlocal enabledelayedexpansion

for %%i in ("%tmp%\encrypt.tmp") do (

echo %%~zi >nul 2>nul

set size=%%~zi

set num=!size:~-1!

set /a mod=!num!%%2

if !mod! equ 0 (goto even) else (goto odd)

)

:even

copy "%tmp%\encrypt.tmp" 加密成品.bat

del "%tmp%\encrypt.tmp"

cls

echo ===============================

echo 恭喜, 批处理加密成功!

echo ===============================

echo.

echo.

echo 按任意键退出......

pause>nul

goto quit

:odd

echo. >>"%tmp%\encrypt.tmp"

copy "%tmp%\encrypt.tmp" 加密成品.bat

del "%tmp%\encrypt.tmp"

cls

echo ===============================

echo 恭喜, 批处理加密成功!

echo ===============================

echo.

echo.

echo 按任意键退出......

pause>nul

goto quit

:newly

cls

echo ================================

echo 找不到批处理文件, 请重新输入!

echo ================================

echo.

echo.

echo 按任意键开始......

pause>nul

goto start

:quit

exit

教你两个方法：

第一种投机取巧：使用bat转exe程序把bat文件转成exe文件，然后把exe文件的后缀名改为bat，这种方法改后的bat文件其实是exe文件，因为基本上任何exe文件改为bat后缀都可以正常运行。

第二种方法：把这种乱码文件（一键备份系统.cmd）的后缀名改为txt，然后用写字板打开（注意是写字板），你就明白了。把前面的一大串“%%a

%%a

%%a

%%a

%%a

%%a

%%a

%%a

%%a

%%a

%%a

%%a

%%a

%%a

%%a

%%a

%%a

%%a

%%a

%%a

%%a

%%a

%%a

%%a

%%a

”保留，后面修改为你的代码即可。

之所以记事本打开是乱码，我估计是记事本不支持这种编码。

注意提问的方式……LZ该去看看置顶帖《提问的艺术》了如果你说的是对bat文件加密，那需要借助文件加密器如果你说的是想写个bat实现输入密码的过程和判断那用下面这段代码试试是不是你要的效果：[*]@echooff[*]set/pa=请输入密码:[*]if"%a%"=="123"([*]echo"密码正确！"[*])else([*]echo"密码错误！"[*])pause代码很简单，不用解释吧，不过只要在bat文件上点右键——编辑就能看到代码内容了，这种密码也没啥意义就是了……

---