中国DOS联盟论坛

中国DOS联盟

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

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

游客:  注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » 批处理实现文件夹加密(原创)
作者:
标题: 批处理实现文件夹加密(原创) 上一主题 | 下一主题
pooloo
初级用户




积分 62
发帖 33
注册 2007-6-16
状态 离线
『楼 主』:  批处理实现文件夹加密(原创)

可以实现市面上同类软件的加密功能  至于什么金刚加密之类的就不说了——用MD5加密算法来加密文件内容太费时间,还不如用winrar加密呢

文件加密.bat 代码如下:

echo off
md RECYCLER55
::可以建立任何类似于RECYCLER55这样的目录(当然取别的名字也可以,只不过后面的RECYCLER55也要一块修改了哦)
echo [.ShellClassInfo] > RECYCLER55\desktop.ini
echo CLSID={645FF040-5081-101B-9F08-00AA002F954E} >>RECYCLER55\desktop.ini
attrib RECYCLER55 +s +h
md \\.\%CD%RECYCLER55\MICROSOFT-7701091-6666888-16826688...\
::可以建立任何类似于MICROSOFT-1234567-1234567-12345678...\这样的畸形目录
cls
::上面的代码建立了一个特殊目录

echo 请拖入要加密的文件夹后回车
echo (文件夹最好在根目录下,而且文件夹名无空格):
set /p scrfile=
cls
md %scrfile%_bak
move %scrfile% %scrfile%_bak
for %%i in ("%scrfile%") do ren \\.\%CD%%%~ni_bak\%%~ni com9.{21EC2020-3AEA-1069-A2DD-08002B30309D}
::上面的代码建立了一个目录'要加密的目录名_bak',然后把要加密的目录剪切进去并更名为特殊目录名

::echo 下面是将文件夹%scrfile%_bak剪切到打开的文件夹中去
move %scrfile%_bak "%CD%RECYCLER55\MICROSOFT-7701091-6666888-16826688....\"
::注意,上面XP下move时MICROSOFT-7701091-6666888-16826688....\有4个点,少一个点就会提示找不到路径
move %scrfile%_bak "%CD%RECYCLER55\MICROSOFT-7701091-6666888-16826688...\"
::注意,上面Vista下move时MICROSOFT-7701091-6666888-16826688....\只有3个点,多一个点就会提示找不到路径
echo 加密完成!

下次发 解密文件夹.bat

2009-7-5 08:40
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
radem
高级用户

CMD感染者


积分 691
发帖 383
注册 2008-5-23
状态 离线
『第 2 楼』:  

%cd%\



2009-7-5 10:44
查看资料  发短消息 网志   编辑帖子  回复  引用回复
qinchun36
高级用户

据说是李先生


积分 609
发帖 400
注册 2008-4-23
状态 离线
『第 3 楼』:  

..............

2009-7-6 07:03
查看资料  发送邮件  发短消息 网志  OICQ (182484135)  编辑帖子  回复  引用回复
xiaofengtoo
新手上路





积分 1
发帖 1
注册 2009-7-10
状态 离线
『第 4 楼』:  

汗 修改文件路径。。。。。。。。。。。。

2009-8-17 07:57
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
jarry0932
初级用户





积分 128
发帖 122
注册 2009-9-21
状态 离线
『第 5 楼』:  

如果用 "%cd%" 是不是更保险一些...

2009-10-10 21:40
查看资料  发送邮件  发短消息 网志  OICQ (274997087)  编辑帖子  回复  引用回复
cj000
新手上路





积分 10
发帖 9
注册 2006-3-21
状态 离线
『第 6 楼』:  

代码看得我眼花。

2009-10-20 09:21
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
sfcctv
中级用户





积分 208
发帖 135
注册 2009-9-12
来自 离恨天
状态 离线
『第 7 楼』:  

楼主,你这是老生常谈了。

2009-11-16 23:04
查看资料  发短消息 网志   编辑帖子  回复  引用回复

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


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



论坛跳转: