中国DOS联盟论坛

中国DOS联盟

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

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

游客:  注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » [推荐][分享]批处理文件加密器
作者:
标题: [推荐][分享]批处理文件加密器 上一主题 | 下一主题
zcydez
初级用户





积分 38
发帖 21
注册 2010-2-21
来自 南昌
状态 离线
『楼 主』:  [推荐][分享]批处理文件加密器


:a
cls
@echo off
title 文件夹加密小程序 QQ:1061159532
echo.正在初始化,请稍后...
MODE CON: COLS=38 LINES=19
color 1e
if exist password (goto g1) else (goto error1)
:g1
cls
set password=
set pass_word=
set errorlevel=
set xz=
set wjm=
set wjm2=
::输入密码
ren password password.exe
@echo off
password "set ''pass=$input''" "请输入密码"  /oem /pass>temp.bat
ren password.exe password
if not errorlevel 1 call temp.bat
del temp.bat 2>nul
if "%pass%" neq "123456789" goto error
:ks
:b
cls
echo.
echo.  ┌───────────────┐
echo.  │   文件加密小程序v1.0beta版   │
echo.  │        欢★迎★使★用        │
echo.  ├───────────────┤
echo.  │请选择功能:(输入序号后回车)│
echo.  │1.新建加密的文件夹            │
echo.  │2.删除加密的文件夹            │
echo.  │3.打开加密的文件夹            │
echo.  │4.退出                        │
echo.  │                              │
echo.  │                              │
echo.  │                              │
echo.  │                              │
echo.  │                              │
echo.  ├───────────────┤
echo.  │                              │
echo.  └───────────────┘
set /p xz=
cls
goto %xz%
:1
echo.
echo.  ┌───────────────┐
echo.  │   文件加密小程序v1.0beta版   │
echo.  │        欢★迎★使★用        │
echo.  ├───────────────┤
echo.  │请选择功能:(输入序号后回车)│
echo.  │新建文件夹 功能:新建一个只有 │
echo.  │本程序才能打开或删除的文件夹,│
echo.  │新建文件夹后可以把要加密的文件│
echo.  │放入加密的文件以达到加密效果。│
echo.  │注:请在新建文件夹前将本程序复│
echo.  │制到要新建文件夹的目录下,因为│
echo.  │文件夹新建后不能复制或移动。  │
echo.  │                              │
echo.  │                              │
echo.  ├───────────────┤
echo.  │                              │
echo.  └───────────────┘
set /p wjm=请输入文件夹名:(不能有空格)
md %wjm%..\
cls
echo.
echo.  ┌───────────────┐
echo.  │   文件加密小程序v1.0beta版   │
echo.  │        欢★迎★使★用        │
echo.  ├───────────────┤
echo.  │新建文件夹 功能:新建一个只有 │
echo.  │本程序才能打开或删除的文件夹,│
echo.  │新建文件夹后可以把要加密的文件│
echo.  │放入加密的文件以达到加密效果。│
echo.  │                              │
echo.  │                              │
echo.  │                              │
echo.  │                              │
echo.  │                              │
echo.  │                              │
echo.  ├───────────────┤
echo.  │操作完成!                    │
echo.  └───────────────┘
ping -n 2 127.0.1>nul
goto b
:2
echo.
echo.  ┌───────────────┐
echo.  │   文件加密小程序v1.0beta版   │
echo.  │        欢★迎★使★用        │
echo.  ├───────────────┤
echo.  │功能:强力删除本程序创建的用普│
echo.  │通方法无法删除的文件夹        │
echo.  │请把要删除的文件夹(必须是本程│
echo.  │序创建的文件夹)拖动到本窗口,│
echo.  │然后回车。                    │
echo.  │                              │
echo.  │                              │
echo.  │                              │
echo.  │                              │
echo.  │                              │
echo.  ├───────────────┤
echo.  │                              │
echo.  └───────────────┘
set /p wjm2=
rd /s /q "%wjm2%.\"
cls
echo.
echo.  ┌───────────────┐
echo.  │   文件加密小程序v1.0beta版   │
echo.  │        欢★迎★使★用        │
echo.  ├───────────────┤
echo.  │功能:强力删除本程序创建的用普│
echo.  │通方法无法删除的文件夹        │
echo.  │请把要删除的文件夹(必须是本程│
echo.  │序创建的文件夹)拖动到本窗口,│
echo.  │然后回车。                    │
echo.  │                              │
echo.  │                              │
echo.  │                              │
echo.  │                              │
echo.  │                              │
echo.  ├───────────────┤
echo.  │操作完成!                    │
echo.  └───────────────┘
ping -n 2 127.0.1>nul
goto b
:3
echo.
echo.  ┌───────────────┐
echo.  │   文件加密小程序v1.0beta版   │
echo.  │        欢★迎★使★用        │
echo.  ├───────────────┤
echo.  │功能:打开本程序创建的用普通方│
echo.  │法无法打开的文件夹,并在文件夹│
echo.  │中进行常规文件操作。          │
echo.  │注:要打开或修改文件,请先把文│
echo.  │件夹里的文件移到别的地方才能正│
echo.  │常操作。                      │
echo.  │请把要打开的文件夹(必须是本程│
echo.  │序创建的文件夹)拖动到本窗口,│
echo.  │然后回车。                    │
echo.  │                              │
echo.  ├───────────────┤
echo.  │                              │
echo.  └───────────────┘
set /p wjm2=
cls
echo.
echo.  ┌───────────────┐
echo.  │   文件加密小程序v1.0beta版   │
echo.  │        欢★迎★使★用        │
echo.  ├───────────────┤
echo.  │功能:打开本程序创建的用普通方│
echo.  │法无法打开的文件夹,并在文件夹│
echo.  │中进行常规文件操作。          │
echo.  │注:要打开或修改文件,请先把文│
echo.  │件夹里的文件移到别的地方才能正│
echo.  │常操作。                      │
echo.  │请把要打开的文件夹(必须是本程│
echo.  │序创建的文件夹)拖动到本窗口,│
echo.  │然后回车。                    │
echo.  │                              │
echo.  ├───────────────┤
echo.  │操作完成!                    │
echo.  └───────────────┘
set wjm2=%wjm2:~0,-1%
call "%windir%\explorer.exe" %wjm2%..\"
rd /s /q %wjm2%"
cls
echo.
echo.  ┌───────────────┐
echo.  │   文件加密小程序v1.0beta版   │
echo.  │        欢★迎★使★用        │
echo.  ├───────────────┤
echo.  │功能:打开本程序创建的用普通方│
echo.  │法无法打开的文件夹,并在文件夹│
echo.  │中进行常规文件操作。          │
echo.  │注:要打开或修改文件,请先把文│
echo.  │件夹里的文件移到别的地方才能正│
echo.  │常操作。                      │
echo.  │请把要打开的文件夹(必须是本程│
echo.  │序创建的文件夹)拖动到本窗口,│
echo.  │然后回车。                    │
echo.  │                              │
echo.  ├───────────────┤
echo.  │操作完成!                    │
echo.  └───────────────┘
ping -n 2 127.0.1>nul
goto b
:4
echo.谢谢使用,再见!
ping -n 3 127.0.1>nul
exit
:error
color c1
echo.程序出现未知错误或密码错误!
echo.程序将在2秒后重启。
ping -n 3 127.0.1>nul
start "" %0
exit
:error1
color c1
cls
echo.错误:文件“password”丢失。
echo.按任意键退出。
pause>nul
exit
密码可以自己定。
注意:必须要有附件password.exe(在附件里)

界面在附件里。

[ Last edited by zcydez on 2010-3-23 at 13:42 ]

附件 1: 文件夹加密小程序.rar (2010-3-23 13:37, 11.75 K,下载次数: 72)
附件 2: 界面.rar (2010-3-23 13:42, 5.37 K,下载次数: 54)
2010-3-23 13:37
查看资料  发送邮件  发短消息 网志  OICQ (1061159532)  编辑帖子  回复  引用回复
33445566
初级用户





积分 29
发帖 16
注册 2007-9-20
状态 离线
『第 2 楼』:  

好东西,支持

2010-3-25 19:25
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
zxin352002187
新手上路





积分 16
发帖 8
注册 2009-12-15
状态 离线
『第 3 楼』:  大哥,这东西不会用。

大哥,这东西不会用。打开来显示错误,password.exe丢失。

2010-4-6 00:42
查看资料  发送邮件  发短消息 网志  OICQ (352002187)  编辑帖子  回复  引用回复
pingfan5666
初级用户





积分 38
发帖 20
注册 2009-5-11
状态 离线
『第 4 楼』:  

不错,,,下了。。

2010-4-6 19:01
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
zcydez
初级用户





积分 38
发帖 21
注册 2010-2-21
来自 南昌
状态 离线
『第 5 楼』:  

如果提示文件丢失,请把文件全部解压再用。。。

2010-5-30 11:27
查看资料  发送邮件  发短消息 网志  OICQ (1061159532)  编辑帖子  回复  引用回复

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


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



论坛跳转: