中国DOS联盟论坛

中国DOS联盟

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

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

游客:  注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »
作者:
标题: 自制windows文件保密程序! 上一主题 | 下一主题
tianzizhi
高级用户




积分 622
发帖 214
注册 2006-9-22
状态 离线
『楼 主』:  自制windows文件保密程序!

下面是源码,希望高手们写出v3.0来,呵呵!!
不过使用时要以exe格式使用,不然让人看到源码安全性可就降低了噢(不过如没有密码任何人也没法看到保密后的文件),!
Windows文件保密专家的exe格式文件下载请到:http://tianzizhi.disk365.cn/
@echo off
title windows文件保密专家  制作人:tianzizhi(cn-dos)... QQ:419503077
:start
setlocal
color 0e
echo      ===============================================================
echo.
echo                       Windows文件保密专家 v2.0
echo.                         制作人:tianzizhi
echo.
echo                说明:本程序可以有效的保护重要的文件不被删除或泄露.
echo                可以建立多个有密码的秘密文件夹,供多人使用,互不影响
echo                    加密文件前,请选择3先建立秘密存储文件夹
echo                      欢迎提出新的建议===QQ:419503077   
echo      ================================================================
echo.
if not exist %windir%\system32\catroot md %windir%\system32\catroot & attrib +h +s %windir%\system32\catroot >nul 2>nul
if not exist %windir%\system32\catroot\{88F29EFD-9624-40I85-B1Y2E-E16D138AFAH15}..\nul md %windir%\system32\catroot\{88F29EFD-9624-40I85-B1Y2E-E16D138AFAH15}..\  >nul 2>nul
echo  ***********欢迎使用windwos文件保密专家 v2.0,请选择选项(1,2,3,4,5,6)***********
echo  1.读取保密的文件
echo  2.存储保密文件
echo  3.建立秘密存储文件夹
echo  4.删除保密文件
echo  5.删除存储保密文件文件夹
echo  6.不可恢复删除读取过的加密文件
echo  7.退出
echo.
set /p choice=请输入选项代码:
if {%choice%}=={} goto start
if /i %choice%==1 goto djm
if /i %choice%==2 goto cjm
if /i %choice%==3 goto jjm
if /i %choice%==4 goto sjm
if /i %choice%==5 goto df
if /i %choice%==6 goto che
if /i %choice%==7 goto quit
cls
goto start
rem========================加入秘密文件夹==========================
:jjm
echo.
echo 准备建立秘密文件夹...
set /p pass2c=请输入密码:
if {%pass2c%}=={} goto jjm
echo 开始根据密码建立保密文件夹......
md "%windir%\system32\catroot\{88F29EFD-9624-40I85-B1Y2E-E16D138AFAH15}..\%pass2c%..\" >nul 2>nul
echo 建立了保密文件夹!
echo.
pause
cls
goto start
rem ======================“加入”部分结束=========================
rem
rem =====================存储数据部分==============================
:cjm
echo.
echo 准备存储保密档案...
set /p pass=请输入密码:
if {%pass%}=={} goto cjm
if exist %windir%\system32\catroot\{88F29EFD-9624-40I85-B1Y2E-E16D138AFAH15}..\%pass%..\nul goto noerror
echo 发生错误,没有和此密码匹配的文件!.....
ping -n 3 127.0.1 >nul 2>nul & cls
goto start
:noerror
md "%userprofile%\桌面\Readyprotect"
echo 请将你需要保密的文件复制到桌面上的Readyprotect文件夹内(被保存的文件不能含有文件夹)
echo 注意:开始保密后会删除原文件!
echo 按任意键开始保密文件.......
pause > nul
echo 开始保密.........
copy "%userprofile%\桌面\Readyprotect\*.*" "%windir%\system32\catroot\{88F29EFD-9624-40I85-B1Y2E-E16D138AFAH15}..\%pass%..\" /y >nul 2>nul
echo 保密完成,正在安全删除原文件........
for /f "delims=" %%i in ('dir "%userprofile%\桌面\Readyprotect\*.*" /a/s/b') do @copy nul "%%i" /y >nul 2>nul
for /f "delims=" %%i in ('dir "%userprofile%\桌面\Readyprotect\*.*" /a/s/b') do @copy nul "%%i" /y >nul 2>nul
for /f "delims=" %%i in ('dir "%userprofile%\桌面\Readyprotect\*.*" /a/s/b') do @copy nul "%%i" /y >nul 2>nul
for /f "delims=" %%i in ('dir "%userprofile%\桌面\Readyprotect\*.*" /a/s/b') do @copy nul "%%i" /y >nul 2>nul
for /f "delims=" %%i in ('dir "%userprofile%\桌面\Readyprotect\*.*" /a/s/b') do @copy nul "%%i" /y >nul 2>nul
del "%userprofile%\桌面\Readyprotect\*.*" /s /f /q /a >nul 2>nul
rd "%userprofile%\桌面\Readyprotect\" /q >nul 2>nul
echo 所有保密完成!
echo.
pause
cls
goto start
rem ==========================存储部分结束=======================
rem
rem ===========================读取数据部分======================
:djm
echo.
echo 准备读取保密文件...
set /p pass2=请输入密码:
if {%pass2%}=={} goto djm
if not exist %windir%\system32\catroot\{88F29EFD-9624-40I85-B1Y2E-E16D138AFAH15}..\%pass2%..\nul echo 发生错误,没有和此密码匹配的文件!.... & ping -n 3 127.0.1 >nul 2>nul & cls & goto start
echo 开始读取被保密的数据.......
echo.
if not exist "%userprofile%\桌面\Unlocked\nul" md "%userprofile%\桌面\Unlocked" >nul 2>nul
copy "%windir%\system32\catroot\{88F29EFD-9624-40I85-B1Y2E-E16D138AFAH15}..\%pass2%..\*.*" "%userprofile%\桌面\Unlocked" >nul 2>nul
if %errorlevel%==1 echo 没有保密的文件,请先存储要保密的文件..... & ping -n 5 127.0.1 >nul 2>nul & cls & goto start
echo 已经解密到桌面上的Unlocked文件夹内.........
echo.
pause
cls
goto start
rem ========================读取数据部分结束=======================
rem
rem ========================删除目录部分===========================
:sjm
echo.
echo.
echo 准备删除秘密文件.......
set /p pass2del=请输入密码:
if {%pass2del%}=={} goto sjm
if not exist %windir%\system32\catroot\{88F29EFD-9624-40I85-B1Y2E-E16D138AFAH15}..\%pass2del%..\nul echo 发生错误,没有和此密码匹配的文件!... & ping -n 3 127.0.1 >nul 2>nul & cls & goto start
echo 开始删除被保密文件夹
rmdir /s "%windir%\system32\catroot\{88F29EFD-9624-40I85-B1Y2E-E16D138AFAH15}..\%pass2del%..\" /Q >nul 2>nul
echo 已经删除被保密文件.......
echo.
pause
cls
goto start
rem ============================删除部分结束======================
rem
rem ===================Del {88F29EFD-9624-40I85-B1Y2E-E16D138AFAH15}==============================
:df
echo.
echo 请删除之前确认里面没有任何秘密文件.(y/n)
set /p yesorno=
if /i %yesorno%==y goto start2del
if /i %yesorno%==n goto sjm
goto df
:start2del
echo 开始删除..........
rd "%windir%\system32\catroot\{88F29EFD-9624-40I85-B1Y2E-E16D138AFAH15}..\" >nul 2>nul
if exist %windir%\system32\catroot\{88F29EFD-9624-40I85-B1Y2E-E16D138AFAH15}..\nul echo **删除失败,可能里面有别的秘密文件。**& goto fail
echo 成功删除!
echo.
pause
cls
:fail
ping 127.0.0.1 -n 5 >nul
cls
goto start
rem ================Del {88F29EFD-9624-40I85-B1Y2E-E16D138AFAH15} End====================
:che
echo.
echo 注意,清除后将无法再用软件恢复出数据,是否继续(y or n)...
set /p yu=
if %yu%==y goto ji
if %yu%==n cls & goto start
echo 错误.请不要乱输字母....
ping -n 3 127.0.1 >nul 2>nul & cls & goto start
:ji
echo 正在彻底清除unlocker内已读取的保密文件,请稍等.......
echo.
for /f "delims=" %%i in ('dir "%userprofile%\桌面\unlocked\*.*" /a/s/b') do @copy nul "%%i" /y >nul 2>nul
for /f "delims=" %%i in ('dir "%userprofile%\桌面\unlocked\*.*" /a/s/b') do @copy nul "%%i" /y >nul 2>nul
for /f "delims=" %%i in ('dir "%userprofile%\桌面\unlocked\*.*" /a/s/b') do @copy nul "%%i" /y >nul 2>nul
for /f "delims=" %%i in ('dir "%userprofile%\桌面\unlocked\*.*" /a/s/b') do @copy nul "%%i" /y >nul 2>nul
for /f "delims=" %%i in ('dir "%userprofile%\桌面\unlocked\*.*" /a/s/b') do @copy nul "%%i" /y >nul 2>nul
del "%userprofile%\桌面\unlocked\*.*" /s /f /q /a >nul 2>nul
rd "%userprofile%\桌面\unlocked\" /q >nul 2>nul
echo 清除完毕....
echo.
pause
cls
goto start
:quit
echo 感谢使用Windows文件保密专家 v2.0!
echo 按任意键退出本程序.
pause > nul
exit

[ Last edited by tianzizhi on 2006-12-20 at 10:07 AM ]

   此帖被 +8 点积分      点击查看详情   
评分人:【 redtek 分数: +5  时间:2006-12-20 09:21
评分人:【 HUNRYBECKY 分数: +3  时间:2006-12-20 12:24


2006-12-20 09:17
查看资料  发送邮件  发短消息 网志  OICQ (419503077)  编辑帖子  回复  引用回复
vkill
金牌会员





积分 4103
发帖 1744
注册 2006-1-20
来自 甘肃.临泽
状态 离线
『第 2 楼』:  

呵呵,我觉得还是这个好
http://www.cn-dos.net/forum/view ... =%E5%8A%A0%E5%AF%86

想在别的机子用可以winrar来打包,winrar有个选项是是否添加数据流

2006-12-21 09:58
查看资料  发送邮件  访问主页  发短消息 网志   编辑帖子  回复  引用回复
electronixtar
铂金会员





积分 7493
发帖 2672
注册 2005-9-2
状态 离线
『第 3 楼』:  

恩,建议不要说 加密,说“伪装”好了

2006-12-25 07:23
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
tianzizhi
高级用户




积分 622
发帖 214
注册 2006-9-22
状态 离线
『第 4 楼』:  

我用的是保密,这样好听点,用伪装不好听啊,呵呵....



QQ:419503077
2006-12-25 08:00
查看资料  发送邮件  发短消息 网志  OICQ (419503077)  编辑帖子  回复  引用回复
ka56
中级用户





积分 234
发帖 129
注册 2006-11-28
状态 离线
『第 5 楼』:  

都是强人哈~

2006-12-25 09:45
查看资料  发短消息 网志   编辑帖子  回复  引用回复
jmz573515
银牌会员




积分 1212
发帖 464
注册 2006-12-13
状态 离线
『第 6 楼』:  

好东东啊,学习!

2006-12-25 09:50
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
aoon
初级用户





积分 122
发帖 47
注册 2006-1-3
状态 离线
『第 7 楼』:  

好东西,可要试试。

2006-12-26 09:02
查看资料  发短消息 网志   编辑帖子  回复  引用回复

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


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



论坛跳转: