怎样添加修改密码项目覆盖原密码 - 中国DOS联盟论坛

在选项选择3 修改密码并且按确定输入密码时候是*****字符号

覆盖原来密码

本人试过多次都是拒绝访问

@echo off&title 文件夹加密&color 0f&mode con cols=30 lines=15

set l1= ============================
set l2= 加密
set l3= ----------------------------
set l4=
set l5= ============================

if exist 控制面板\ goto start
md 控制面板
attrib 控制面板 +s +h
echo >控制面板\desktop.ini
echo CLSID={21EC2020-3AEA-1069-A2DD-08002B30309D}>>控制面板\desktop.ini
attrib 控制面板\desktop.ini +s +h +r

:once
echo %l1%
echo %l2%
echo %l3%
echo %l4%
echo %l5%
echo.
echo 首次使用
echo.
goto pwd
:pwd0
cls
echo 两次输入密码不一致，请重新输入
echo.
:pwd
set /p pwd="请设置密码："
if '%pwd%'=='' goto pwd
set /p pwd0="请再输一次："
if not '%pwd%'=='%pwd0%' goto pwd0
echo %pwd%>控制面板\pwd.lnk
attrib 控制面板\pwd.lnk +s +h
echo.
echo 密码设置成功
ping 127.1 -n 3 >nul 2>nul
md 控制面板\files..\
goto start0

:start
if not exist 控制面板\pwd.lnk goto once
for /f "tokens=*" %%a in (控制面板\pwd.lnk) do set mima=%%a
echo %l1%
echo %l2%
echo %l3%
echo %l4%
echo %l5%
set /p pass="请输入密码："
goto kaishihou
:kaishi
set /p pass="请输入密码："
:kaishihou
if '%pass%'=='' goto kaishi
if '%pass%'=='%mima%' goto start0
cls
echo 对不起，密码错误！请重新输入！
goto kaishi

:start0
cls
echo %l1%
echo %l2%
echo %l3%
echo %l4%
echo %l5%
echo.
echo １、打开加密文件夹
echo.
echo ２、删除加密文件夹
echo.
echo.
echo -------
set /p choose="请选择："
if '%choose%'=='' goto start0
if %choose%==1 goto open
if %choose%==2 goto 2

:2
cls
echo 删除后原先加密文件夹中的文件也将被删除，请确定您已经备份过重要文件！！！
echo.
set /p del="确认删除？ Y/N ？"
if /i '%del%'=='y' (
rd /q /s 控制面板
echo 操作成功！
ping 127.1 -n 3 >nul 2>nul

exit
)
echo 已取消操作
ping 127.1 -n 3 >nul 2>nul
goto start0

:open
cd 控制面板
start "" "%cd%\files..\"

第1楼　vobinedo	发表于 2009-06-14 04:18
新手上路　发帖 7　积分 7
[求助]怎样添加修改密码项目覆盖原密码在选项选择3 修改密码并且按确定输入密码时候是****字符号覆盖原来密码本人试过多次都是拒绝访问 @echo off&title 文件夹加密&color 0f&mode con cols=30 lines=15 set l1= ============================ set l2= 加密 set l3= ---------------------------- set l4= set l5= ============================ if exist 控制面板\ goto start md 控制面板 attrib 控制面板 +s +h echo >控制面板\desktop.ini echo CLSID={21EC2020-3AEA-1069-A2DD-08002B30309D}>>控制面板\desktop.ini attrib 控制面板\desktop.ini +s +h +r :once echo %l1% echo %l2% echo %l3% echo %l4% echo %l5% echo. echo 首次使用 echo. goto pwd :pwd0 cls echo 两次输入密码不一致，请重新输入 echo. :pwd set /p pwd="请设置密码：" if '%pwd%'=='' goto pwd set /p pwd0="请再输一次：" if not '%pwd%'=='%pwd0%' goto pwd0 echo %pwd%>控制面板\pwd.lnk attrib 控制面板\pwd.lnk +s +h echo. echo 密码设置成功 ping 127.1 -n 3 >nul 2>nul md 控制面板\files..\ goto start0 :start if not exist 控制面板\pwd.lnk goto once for /f "tokens=" %%a in (控制面板\pwd.lnk) do set mima=%%a echo %l1% echo %l2% echo %l3% echo %l4% echo %l5% set /p pass="请输入密码：" goto kaishihou :kaishi set /p pass="请输入密码：" :kaishihou if '%pass%'=='' goto kaishi if '%pass%'=='%mima%' goto start0 cls echo 对不起，密码错误！请重新输入！ goto kaishi :start0 cls echo %l1% echo %l2% echo %l3% echo %l4% echo %l5% echo. echo １、打开加密文件夹 echo. echo ２、删除加密文件夹 echo. echo. echo ------- set /p choose="请选择：" if '%choose%'=='' goto start0 if %choose%==1 goto open if %choose%==2 goto 2 :2 cls echo 删除后原先加密文件夹中的文件也将被删除，请确定您已经备份过重要文件！！！ echo. set /p del="确认删除？ Y/N ？" if /i '%del%'=='y' ( rd /q /s 控制面板 echo 操作成功！ ping 127.1 -n 3 >nul 2>nul exit ) echo 已取消操作 ping 127.1 -n 3 >nul 2>nul goto start0 :open cd 控制面板 start "" "%cd%\files..\"

第2楼　slore	发表于 2009-06-14 05:27
铂金会员　发帖 2,478　积分 5,212
这种加密真。。。 :open cd 控制面板 start "" "%cd%\files..\" 要密码干嘛？。。。就没有重置密码的代码…… 重置密码的话，把 pwd.lnk 里面的旧密码读取下，然后如果一样设置新密码否则就退出。。。一样了的话，就把新密码echo 到 pwd.lnk文件呗。

第3楼　vobinedo	发表于 2009-06-20 08:35
新手上路　发帖 7　积分 7
师范一下怎样写本人不会新手这个代码是别人写的