另类的文件夹加密(批处理实现)(附一个有点儿小意思的寻找彩蛋的DEMO)

BeanJoy 2013-06-10 02:33:36
  逛坛子的时候,看到这个帖子路径太深,无法删除文件夹!!!,突然想起之前写的批处理来了,可以新建指定层数指定个数的目录,就上传到坛子里,还带个寻找彩蛋的DEMO,有点儿小意思,端午节了,大家娱乐下,看谁能先找到彩蛋。
  以下转自博客:另类的文件夹加密(批处理实现)
  DEMO下载地址:程序员寻找彩蛋
  之前看到有网友把日本两人剧情片放在诸如“日本文化交流”、“英语四六级”等文件夹里,或者建很多个很深的文件夹,然后放到其中一个文件夹内,一般人看到就不会想翻的。闲来无事,就写了个批处理来实现。
  此批处理可以实现每层新建指定个数的文件夹,然后每个文件夹里再递归新建相同个数的文件夹,一直达到指定的层数为止。
  批处理代码如下:

@echo off

::MAXDIR为每层的文件夹个数,最大为10,既:0,1,2...9
set /p MAXDIR=请输入每位密码选择的个数(默认值5)(范围:1-10):
if ""=="%MAXDIR%" set /a MAXDIR=5
if %MAXDIR% lss 1 goto :error
if %MAXDIR% gtr 10 goto :error

::MAXDEEP为密码的位数
set /p MAXDEEP=请输入密码位数(默认值5):
if ""=="%MAXDEEP%" set /a MAXDEEP=5
if %MAXDEEP% lss 1 goto :error
set /a deep=1
set /a dirCount=0
set /a MAXDEEP=MAXDEEP+1
call :calcCount
call :mdNew
echo.
echo 创建:%cd%
echo 需要创建文件夹个数:%dirCount%
echo 正在创建中,正耐心等待。。。
echo 按Ctrl+C可以中止程序
goto :circle
:end
echo 操作已完成
title 操作已完成
pause
exit

:circle
if "0"=="%deep%" goto :end
call :getMaxDirName
::得到当前目录内最大文件夹名
if "NoDir"=="%maxDirName%" goto :maxDirName_0
goto :maxDirName_1
:maxDirName_0
set /a maxDirName=0
goto :mdDirAndCd
:maxDirName_1
set /a maxDirName=maxDirName+1
if "%MAXDIR%"=="%maxDirName%" goto:maxDeep
:mdDirAndCd
::建立文件夹并进入
md %maxDirName%
cd %maxDirName%
set /a dirCount=dirCount-1
title 剩余-%dirCount%
set /a deep=deep+1
if "%MAXDEEP%"=="%deep%" goto :maxDeep
goto :circle
:maxDeep
rem echo>test.txt
cd..
set /a deep=deep-1
goto :circle

:getMaxDirName
set maxDirName=NoDir
for /l %%i in (9,-1,0) do if exist %%i set /a maxDirName=%%i & goto :eof
goto :eof

:mdNew
if not exist 加密文件夹 md 加密文件夹 & cd 加密文件夹 & goto :eof
for /l %%i in (0,1,9999) do if not exist 加密文件夹_%%i (md 加密文件夹_%%i & cd 加密文件夹_%%i & goto :eof)
goto :eof

:calcCount
set /a dirCount=MAXDIR
set /a temp=MAXDIR
for /l %%i in (3,1,%MAXDEEP%) do set /a dirCount=dirCount+temp*MAXDIR & set /a temp=temp*MAXDIR
goto :eof

:error
echo 输入有误!
pause
exit


  截图如下:




  用此批处理创建了个5层、每层5个文件夹的DEMO,里面有彩蛋哦,大家可以找找,DEMO下载链接:程序员寻找彩蛋


...全文
156 1 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
1 条回复
切换为时间正序
请发表友善的回复…
发表回复
shen_wei 2013-06-13
  • 打赏
  • 举报
回复
不错,学习学习、、、

16,548

社区成员

发帖
与我相关
我的任务
社区描述
VC/MFC相关问题讨论
社区管理员
  • 基础类社区
  • AIGC Browser
  • encoderlee
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告

        VC/MFC社区版块或许是CSDN最“古老”的版块了,记忆之中,与CSDN的年龄几乎差不多。随着时间的推移,MFC技术渐渐的偏离了开发主流,若干年之后的今天,当我们面对着微软的这个经典之笔,内心充满着敬意,那些曾经的记忆,可以说代表着二十年前曾经的辉煌……
        向经典致敬,或许是老一代程序员内心里面难以释怀的感受。互联网大行其道的今天,我们期待着MFC技术能够恢复其曾经的辉煌,或许这个期待会永远成为一种“梦想”,或许一切皆有可能……
        我们希望这个版块可以很好的适配Web时代,期待更好的互联网技术能够使得MFC技术框架得以重现活力,……

试试用AI创作助手写篇文章吧